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One IBM PC, XT/AT or compat- 
ible, plus one Advanced Digital 
PC-Slave II, now equals a com- 
plete 3-user (or more) system. 


Do you need a true multi- 
user PC system? 


If so, read on. The Advanced 
Digital solution will simply add 
up in your favor. 

To add two or more users to 
your IBM PC, XT/AT or compat- 
ible, just plug in our PC-SLAVE II 
and two low-cost monochrome 
monitors and keyboards. You can 
now run PC-DOS™ or MS-DOS" 
on each user with PC-NET™ soft- 
ware to support your network. 
The end result is a true multi- 
processor system that allows each 
user to run independently on 
their own CPU and memory, yet 
sharing a common data base. 


Do you need networking 
capabilities? 


The realm of IBM networks is 
only a step away with the 
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PC-Slave II and PC-NET software. 
An expanding network of multi- 
user PC’s is truly cost-effective 
since you will be sharing data and 
communication between users and 
PCs. File and record locking are 
also provided so each user can 
run independently of others while 
still tied through the network. 


Do you need additional 
users? 


Expand your existing supply 
of PC standalones into multi-user 
systems by simply adding more 
PC-Slave II’s. 

The PC-Slave II features two 
Intel 80188 CPU’s @8Mhz, two 
512Kb RAM per CPU and two 
monochrome/keyboard controllers 
all on a single board. 


MS-DOS is a registered trademark of Microsoft 
PC-DOS, PC-NET are registered trademarks 

of IBM Corporation 

PC-Slave II is a registered trademark of 
Advanced Digital Corporation 
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To learn more about the multi-user 
solution contact: 

ADVANCED DIGITAL CORPORATION 
5432 Production Drive 

Huntington Beach, CA 92649 


(714) 891-4004 (800) 251-1801 
Telex 183210 ADVANCED HTBH 


ADVANCED DIGITAL U.K. LTD. 
27 Princes Street, Hanover Square 
London W1R8NQ-United Kingdom 
(01) 409-0777 (01) 409-3351 

TLX 265840 FINEST 





TECH TURBO PCI/AT | 


$2299 
PRICE INCLUDES: 
™6 1/08 MHZ 80286 CPU 
@512K 
@ ONE, 1.2 MB FLOPPY DRIVE 
®™ 8 EXPANSION SLOTS 
@ 795 WATT POWER SUPPLY 
™ COMPLETE MS DOS, PC 
DOS, XENIX COMPATIBILITY 
@ RUNS LOTUS 123, DBASE III 
FRAMEWORK AND ALL 
OTHER POPULAR AT 
SOFTWARE 
@ ONE YEAR WARRANTY!! 


OPTIONS: 
TECH TURBO PC/AT WITH 
20MB HARD DISK $2699 


TECH TURBO PC/AT WITH 
20MB HARD DISK, 
MONOCHROME MONITOR, 
HERCULES® COMPATIBLE 
MONOGRAPHICS CARD 

$2899 
ALSO AVAILABLE WITH TAPE 
BACKUPS, MODEMS, LARGER 
HARD DISKS, AND NETWORK- 
ING SYSTEMS. 
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.at a not so IBM price 


TECH PCIAT 
$1999 


' PRICE INCLUDES: 


®@ 6MHZ 80286 CPU 


| 512K 
_ ONE, 1.2 MB FLOPPY DRIVE 


| 


| #8 EXPANSION SLOTS 


| = 195 WATT POWER SUPPLY 
_ ™ COMPLETE MS DOS, PC 


DOS, XENIX COMPATIBILITY 

@ RUNS LOTUS 123, DBASE III 
FRAMEWORK AND ALL 
OTHER POPULAR AT 
SOFTWARE. 


| § ONE YEAR WARRANTY! 


| 


| 


_ OPTIONS: 
| TECH PC/AT WITH 20 MB 
_ HARD DISK 


$2399 


| TECH PC/AT WITH 20MB 


HARD DISK, MONOCHROME 

MONITOR, 

HERCULES® COMPATIBLE 

MONO/GRAPHICS CARD 
$2599 


_ ALSO AVAILABLE WITH TAPE 
_ BACKUPS, MODEMS, LARGER 


HARD DISKS, AND NETWORK- 
ING SYSTEMS. 





$1099 


_ PRICE INCLUDES: 
| &4 707 MHZ SOFTWARE 


SWITCHABLE CPU 


| = 640K 
| = TWO 360K DS/DD FLOPPY 


DISK DRIVES 


| m8 EXPANSION SLOTS 
__™ 135 WATT POWER SUPPLY 
_ § ONE YEAR WARRANTY! 


OPTIONS: 
TECH TURBO PC/XT WITH 
20MB HARD DISK $1599 


TECH TURBO PC/XT WITH 
20MB HARD DISK, MONO- 
CHROME MONITOR AND 
HERCULES COMPATIBLE 
MONO/GRAPHICS CARD 
$1799 
ALSO AVAILABLE WITH TAPE 
BACKUPS, MODEMS, LARGER 
HARD DISKS, AND NETWORK- 


| ING SYSTEMS. 


_ TECH TURBO PC/XT | | 


TECH PC/XT 
$799 


_ PRICE INCLUDES: 


| @4.77 MHZ CPU 
| 256K 





m 7WO, 360K DS/DD FLOPPY 
DRIVES 


_ @ 8 EXPANSION SLOTS 


@ 735 WATT POWER SUPPLY 


_ § ONE YEAR WARRANTY!!! 


OPTIONS: 

TECH PC/XT WITH 20MB 
HARD DISK $1299 
TECH PC/XT WITH 20MB 
HARD DISK, MONOCRHOME 
MONITOR, HERCULES COM- 
PATIBLE MONO/GRAPHICS 
CARD $149 
ALSO AVAILABLE WITH TAPE 
BACKUPS, MODEMS, LARGER 


_ HARD DISKS, AND NETWORK- 
| ING SYSTEMS. 


HI-TEK PGS AVT TAXAN IBM AMDEK HERCULES GENOA PARADISE TEAC TOSHIBA HARDWARE/SOFTWARE 
NETWORKING HAYS AST JRAM HI-TEK PGS AVT TAXAN AMDEK HERCULES GENOA PARADISE TEAC TOSHIBA 


PLEASE ALLOW ONE WEEK VISA 


FOR SHIPPING 





MASTERCHARGE 


©1985 TECH PC 


TECH PERSONAL COMPUTERS 


2131 South Hathaway, Santa Ana, California 92705 


TELEX: 272006 Answer Back-TECH FAX: 714/556-8325 


1141754-1170 


"IBM. IBM PC. XT, and AT are registered trademarks of International “Hercules is a registered trademark of Hercules Computer 


Business Machines Corp Technology 


Users only circle No. 279 on reader service card. Dealers only circle No. 245 on reader service card. 


Why your next generation of 
products should use our Sth 
generation tools. 






Arity’s integrated family of programming tools allows you to combine software written in 
Arity/Prolog, the best of the fifth generation languages, with Arity SQL, the best of the 
fourth generation languages, and with conventional third generation languages such as 
C or assembly language to build your smarter application. 


You can use Arity/Prolog to build expert systems using the Arity Expert Systems 
Development Package. Or to build natural language frontends. Or to build intelligent 
information management systems. Arity/Prolog lets you build advanced technology into 
your vertical applications package. 


And more... 


That's not the whole story. Arity’s products are all designed to be fast, powerful, serious. 
Each of our products contains unexpected bonuses. Such as a one gigabyte virtual 
database integrated into Arity/Prolog. The most powerful of its kind on a PC, 


Quality first. Then price. 


In order to be the best, we had to prove it to our customers. Our tradition of quality 
software design is reflected in every product we sell. Quality first. ‘Then price. And we 
always provide the best in customer support. 


Our products are not copy protected. We do not charge royalties. We offer generous 
educational and quantity discounts. And we have a 30 day money back guarantee. 


‘Try us to know that we keep our promise on commitment to quality and reliability. ‘Iry 
us by using our electronic bulletin board at 617-369-5622 or call us by telephone— you 
can reach us at 617-371-2422. 


Or fill in this coupon. Whether you order today or not, let us send you full descriptions 
of our integrated family of Arity products. 





arity | Please complete this form to place your order and/or request detailed information. 
| Quantty — Info only 
| Arity/Prolog Compiler and Interpreter V4... ee eee ee 32 ee ee 
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Arity Screen: ast toginit 027. oti as Saleen ee $ 49.95 faiactee 
the IBM hs XT, AT | Arity Pile Interchange Wools 2 os. 2S yer etre ee So $ 49.95 ee 
and all MS-DOS | ‘NOTAL AMOUNT (MA residents add 5% sales tax) (Vhese prices include shipping to all U.S. cities) $ 
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HUMAN INTERFACE DESIGN: From the Outside In 
by Jim Edlin 

Jim Edlin here discusses designing a human interface and 
tools that make that job easier . 

























Ever wanted to » 
redesign a 








commercial HUMAN INTERFACE DESIGN: An Interview with 32 
program’s user Jet Raskin 
f 2 by the DDJ editors 
int erfi ace. Erstwhile DDJ editor Raskin left these pages some years 


ago to join a startup firm, for which he conceived a 
computer called Mac. In a return visit, he talks about mice, 













Why an > modes, and his user-interface theory of operation. 
advocate of GRAPHICS: Simple Plots with the Enhanced Graphics 42 
e 1 ee f Adapter 
SsImplicily by Nabajyoti Barkakati 












thinks we need 
two cursors 
Dense graphics 


The author applies an algorithm discussed in DDJ’s May 

1985 issue to the development of graphics primitives for 

fast, high-density EGA graphics. 

MODULA-2: A 68000 Cross Assembler—Part 2 Ag 
by Brian R. Anderson 

The source code for the implementation modules. 



























Tools for > CP/M: The Cryptographer’s Toolbox 58 
° by Fred A. Scacchitti 
ee tion and A set of tools useful for building encryption schemes. 
decryption 


COLUMNS 


C CHEST: Direct Access to the IBM Video Display 18 
by Allen Holub 

Allen presents a set of routines that break some rules to 

achieve blinding graphics speed. 

16-BIT SOFTWARE TOOLBOX: MS-DOS Books, DOS’ 106 
Tricks, PC/AT Interrupts, FORTRAN 

by Ray Duncan 














Fast graphics p 








How towritea p> 















memory- Ray's readers present alternate solutions to the FORTRAN- 
resident tc-Exec-call interface and the DOS 20-file limitation 
: : problems. 
app lication THE RIGHT TO ASSEMBLE: Code Compression with 110 









Mini-interpreters 

by Nick Turner 

The new DDJ editor discusses techniques for crunching 
code for processors from the 6502 to the 68000. 
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About the Cover 
Photographer Tom Upton rede- 
signed this classic shell. 


This Issue 
With Bob Frankston, Dan Brick- 
lin won the 1985 ACM Software 
System Award for inventing a 
new software metaphor in Visi- 
Calc. Bricklin’s latest invention is 
a tool for allowing software de- 
velopers to play the what-if 
game with their own visual met- 
aphors before writing any code. 
We asked Jim Edlin to use Brick- 
lin’s program to demonstrate the 
process of designing from the 
outside in. 


Next Issue 
In June, we'll present techniques 
for ensuring error-free telecom- 
munications transmission. We'll 
also take a closer look at Jef Ras- 
kin’s unusual SwyftCard for the 
Apple Ile, and introduce two new 
columns. Structured Program- 
ming will concentrate on Algol- 
derived languages such as Pascal, 
Modula-2, and Ada; and our edi- 
tor-in-chief’s new column will 
range from a look at Turbo Prolog 
to a satire on the issue’s theme. 
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THE ST COMPUTER LINE 
FROM ATARI. 


IT’S LIKE GETTING THE POWER AND SPEED OF A FERRARI 
FOR THE PRICE OF A FORD. 


When Atari introduced the 520ST™, 
we set the personal computer industry 
on its ear. 

Nobody had ever produced a machine 
so powerful and technically advanced 
for such an incredibly low price. 
Nobody but Atari has done it yet. 

The competition was stunned. 

The critics wrote rave reviews. 

And consumers were ecstatic. 

We could have rested on our laurels, 
but we didn’t. 

Instead, Atari extended the ST concept 
to a new computer called the 1040ST™. 

The amazing new 1040ST is even 
more powerful than the 520ST and 
years ahead of all the competition at 
almost any price. The only question in 

oy 8 
Price $999 $1295 
Seg - 


Standard RAM 1 MB 256K 256K 128K 


Standard ROM 192k 16K 
Number of Keys 5) Fee 


Mouse Yes Optional 


Screen Resolution 
(Non-Interlaced Mode) 
Color 640x200 |640x200***| 640x200 None 
Monochrome 640x400 |640x200***|720x350**} 512x342 


560x192 
560 x 192 


Color Output Yes Yes 
Number of Colors 512 16 
Disk Drive 3.5” 5.25" 
(DMA) Port Yes No Yes No No 
Midi Interface Yes No 
# of Sound Voices 3 Eke ap eee Eee 1 


Atari 520ST with 512K RAM, $799. 


*Connects to standard color TV. For RGB color monitor add $200. 
**With optional monochrome board (non bit-mapped). 
***Interlace Mode —- 640x400. 


Ferrari is a registered trademark of Ferrari Italia SpA and Ferrari of 
America, Inc. Ford is a registered trademark of Ford Motor Company. 
IBM and PCAT are registered trademarks of International Business 
Machines Corp. Commodore and Amiga are trademarks of Com- 
modore Electronics LTD. Apple, Apple lic, and Macintosh are 
trademarks of Apple Computer, Inc. Atari, 520ST, 1040ST, and ST are 
trademarks of Atari Corp. 
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1986 isn’t which 
company to buy 
a computer 
from, but which 
computer to buy 
from Atari. 

At $799, the 
520ST gives you 512 Kbytes of RAM, a 
high-resolution monochrome monitor, 
2-button mouse, and 3.5” disk drive. 

At $999, the 1040ST gives you 1024 
Kbytes of RAM, an ultra high-resolution 
monochrome monitor, 2-button mouse, 
and a built-in double-sided 3.5” disk 
drive, plus built-in power supply. Both 
the 520ST and the 1040ST can be con- 
nected directly to your own color T:V, 
Or you can add an Atari RGB color monitor 
to get the sharpest, most colorful images 
possible. Add $200 for color monitor. 

It’s simply a matter of choosing which 
model best fits your needs. 

And whether you choose the 520ST 
or the 1040ST, you'll be getting the 
power and speed of a Ferrari for the 
price of a Ford. 

In fact, you'll save hundreds and in 
some cases thousands of dollars over 
comparable computers. Which is why 
consumers are still ecstatic. Why the’ 
critics are still writing rave reviews. 
And why the competition is still stunned. 


A ATARI 


POWER WITHOUT THE PRICE. 





EDITORIAL 


finally hired an 

editor. Now I 

can spend my 
afternoons on_ the 
beach as an editor-in- 
chief ought to. I can 
also write that back- 
of-the-magazine col- 
umn I’ve been _plan- 
ning—it will appear 
next month. That’s the 
new guy at the right. 
Ill let him introduce himself: 
Michael Swaine, editor-in-chief 


I'm Nick Turner, the new editor of 
DDJ. lve been a professional consul- 
tant for the last few years, and before 
that I spent three and a half years as a 
game designer at Atari. (I did Super 
Breakout, Demons to Diamonds, and 
Frog Pond, and I worked with anoth- 
er programmer to create Snoopy and 
the Red Baron—all games for the 2600 
VCS machine.) After I left Atari, I 
joined a start-up firm that promptly 
went under. I have worked with 
other companies on a consulting 
_ basis. 

Now that I’m the editor, I have a 
chance to help guide the magazine 
and keep it focused. Always eclectic 
and pertinent, DDJ is more varied and 
interesting than ever. Professionals 
experienced in all areas of computer 
science submit articles that explain 
their freshest and most innovative 
ideas. I want to continue the tradition. 
It's an honor to be involved in a maga- 
zine with such a concerned and com- 
mitted readership. 

Now, down to work. We're looking 
for articles that feature elegant, 
clean, sophisticated programs. This is 
your clhlaice tO get involved Ii 
you ve got a program, utility, or cod- 
ing technique that is really nifty, will 
you write it up and share it with the 
rest of us? Dont forget to send us a 
disk containing everything that you 
submit. 

If youre in doubt about whether 
your manuscript would be appropri- 
ate for DDJ, why not give me a call? 

























You can reach me 
during the business 
day (Pacific time) at 
(415) 366-3600. I'll en- 
joy discussing our 
upcoming schedule 
with you. Heres a 
quick rundown of 
what's coming up: 

Our September is- 
sue, with an author 
deadline of June 1, 
will deal with algorithms. I'd particu- 
larly like to see something on the re- 
cent advances in linear program- 
ming. It would also be nice to have 
some material on real-world algo- 
rithms, for example, the algorithms 
used by robots to navigate complex 
spaces. 

October focuses on the 80286 and 
80386 processors. How will they 
compete with the 680XX and 320XX 
lines? What makes them more (or 
less) useful or efficient? How is the 
upgrade from the 80286 to the 80386 
being handled? In particular, I'd like 
to see some articles with tight ma- 
chine-language code. October's dead- 
line is July 1. 

November will be about graphics. 
This should be a really fun issue be- 
cause there’s been so much happen- 
ing recently. I'd like to get some ma- 
terial on the recent advances in 
surface depiction, ray-tracing, parti- 
cle systems, or any of the other 
amazing breakthroughs of the last 
two years. Manuscript deadline is 
August 1. 

Finally, December will concen- 
trate on operating systems. I'd partic- 
ularly like material on the very low- 
est levels of operating-system 
design—the central kernel—where 
the nuts-and-bolts task handling 
takes place. Deadline for December is 
September 1. 
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The C for Microcom 


puters 


© PC-DOS, MS-DOS, CP/M-86, Macintosh, Amiga, Apple II, CP/M-80, Radio Shack, 
Commodore, XENIX, ROM, and Cross Development systems 


Manx Aztec C86 
“A compiler that has many strengths .. 
for serious work” 

Computer Language review, February 1985 


Great Code: Manx Aztec C86 generates fast executing 
compact code. The benchmark results below are from a 
study conducted by Manx. The Dhrystone benchmark 
(CACM 10/84 27:10 p1018) measures performance for a 
systems software instruction mix. The results are with- 
out register variables. With register variables, Manx, 
Microsoft, and Mark Williams run proportionately faster, 
Lattice and Computer Innovations show no improve- 
ment. 


. quite valuable 


Compile/ 
Link Time 


Execution Code 
Time Size 


Dhrystone Benchmark 
Manx Aztec C86 3.3 34 secs 5,760 
Microsoft C 3.0 34 secs 7,146 
Optimized C86 2.20) 53secs 11,009 
Mark Williams 2.0 56secs 12,980 
Lattice 2.14 89 secs 20,404 


93 secs 
119 secs 
172 secs 
113 secs 
117 secs 


Great Features: Manx Aztec C86 is bundled with a powerful 
array of well documented productivity tools, library routines 
and features. 

Optimized C compiler 
AS86 Macro Assembler 
80186/80286 Support 
8087/80287 Sensing Lib 
Extensive UNIX Library 
Large Memory Model 

Z (vi) Source Editor -c 
ROM Support Package-c § INTEL HEX Utility -c 
Library Source Code -c Mixed memory models -c 
MAKE, DIFF and GREP -c Source Debugger -c 

One year of updates -c CP/M-86 Library -c 


Symbolic Debugger 

LN86 Overlay Linker 
Librarian 

Profiler 

DOS, Screen, & Graphics Lib 
Intel Object Option 

CP/M-86 Library -c 


Manx offers two commercial development systems, 
Aztec C86-c and Aztec C86-d. Items marked -c are 
special features of the Aztec C86-c system. 


Aztec C86-c Commercial System 
Aztec C86-d Developer’s System $299 
Aztec C86-p Personal System $199 
Aztec C86-a Apprentice System $49 


All systems are upgradable by paying the difference 
in price plus $10. 


Third Party Software: There are a number of high qual- 
ity support packages for Manx Aztec C86 for screen 
management, graphics, database management, and soft- 
ware development. 


C-tree $395 
PHACT $250 
HALO $250 Amber Windows $59 
PRE-C $395 Windows for C $195 
WindScreen $149 FirsTime $295 
SunScreen $99 = _C Util Lib $185 
PANEL $295 Plink-86 $395 


$499 


Greenleaf $185 
PC-lint $98 


Manx Aztec C68k 


“Library handling is very flexible ... documentation is 
excellent ... the shell a pleasure to work in... blows 
away the competition for pure compile speed... an ex- 
cellent effort.” 

Computer Language review, April 1985 


Aztec C68k is the most widely used commercial C com- 
piler for the Macintosh. Its quality, performance, and 
completeness place Manx Aztec C68k in a position be- 
yond comparison. It is available in several upgradable 
versions. 
Optimized C 
Macro Assembler 
Overlay Linker 
Resource Compiler 
Debuggers 
Librarian 

Source Editor 
MacRam Disk -c 
Library Source -c 


Creates Clickable Applications 
Mouse Enhanced SHELL 

Easy Access to Mac Toolbox 
UNIX Library Functions 
Terminal Emulator (Source) 
Clear Detailed Documentation 
C-Stuff Library 

UniTools (vi,make,diff,grep) -c 
One Year of Updates -c 

Items marked -c are available only in the Manx Aztec 


C86-c system. Other features are in both the Aztec C86-d 
and Aztec C86-c systems. 


Aztec C68k-c Commercial System $499 
Aztec C68d-d Developer’s System $299 
Aztec C68k-p Personal System $199 
C-tree database (source) $399 


AMIGA, CP/M-68k, 68k UNIX call 


Manx Aztec C65 


“The AZTEC C system is one of the finest software 
packages I have seen” 
NIBBLE review, July 1984 


A vast amount of business, consumer, and educational 
software is implemented in Manx Aztec C65. The quality 
and comprehensiveness of this system is competitive 
with 16 bit C systems. The system includes a full optim- 
ized C compiler, 6502 assembler, linkage editor, UNIX 
library, screen and graphics libraries, shell, and much 
more. The Apple II version runs under DOS 3.3, and 
ProDOS, Cross versions are available. 

The Aztec C65-c/128 Commodore system runs under 
the C128 CP/M environment and generates programs for 
the C64, C128, and CP/M environments. Call for prices 
and availability of Apprentice, Personal and Developer 
versions for the Commodore 64 and 128 machines. 


Aztec C65-c ProDOS & DOS 3.3. $399 
Aztec C65-d Apple DOS 3.3 $199 
Aztec C65-p Apple Personal system $99 
Aztec C65-a for learning C $49 
Aztec C65-c/128 C64, C128, CP/M $399 


Distribution of Manx Aztec C 

In the USA, Manx Software Systems is the sole and ex- 
clusive distributor of Aztec C. Any telephone or mail 
order sales other than through Manx are unauthorized. 


Cross developed programs are edited, compiled, assem- 
bled, and linked on one machine (the HOST) and trans- 
ferred to another machine (the TARGET) for execution. 
This method is useful where the target machine is slower 
or more limited than the HOST, Manx cross compilers 
are used heavily to develop software for business, 
consumer, scientific, industrial, research, and education- 
al applications. 


HOSTS: VAX UNIX ($3000), PDP-11 UNIX ($2000), MS- 
DOS ($750), CP/M ($750), MACINTOSH ($750), 
CP/M-68k ($750), XENIX ($750). 


TARGETS: MS-DOS, CP/M-86, Macintosh, CP/M-68k, 
CP/M-80, TRS-80 3 & 4, Apple II, Commodore C64, 
8086/80x86 ROM, 68xxx ROM, 8080/8085/Z80 ROM, 
65xx ROM. 

The first TARGET is included in the price of the HOST 
system. Additional TARGETS are $300 to $500 (non 
VAX) or $1000 (VAX). 

Call Manx for information on cross development to the 
68000, 65816, Amiga, C128, CP/M-68K, VRTX, and 
others. 


Manx Aztec CI 


‘Tve had a lot of experience with different C compilers, 
but the Aztec C80 Compiler and Professional Develop- 
ment System is the best I've seen.” 

80-Micro, December, 1984, John B. Harrell III 


Aztec C II-c (CP/M & ROM) $349 
Aztec C II-d (CP/M) $199 
C-tree database (source) $399 
Aztec C80-c (TRS-80 3 & 4) $299 
Aztec C80-d (TRS-80 3 & 4) $199 


How To Become an Aztec C User 


To become an Aztec C user call 1-800-221-0440 or call 
1-800-832-9273 (800TTEC WARE). In NJ or outside the 
USA call 201-530-7997. Orders can also be telexed to 
4995812. 

Payment can be by check, COD, American Express, 
VISA, Master Card, or Net 30 to qualified customers. 

Orders can also be mailed to Manx Software Systems, 
Box 55, Shrewsbury, NJ 07701. 


How To Get More Information 

To get more information on Manx Aztec C and related 
products, call 1-800-221-0440, or 201-530-7997, or write 
to Manx Software Systems. 


30 Day Guarantee 

Any Manx Aztec C development system can be return- 
ed within 30 days.for a refund if it fails to meet your 
needs. The only restrictions are that the original pur- 
chase must be directly from Manx, shipped within the 
USA, and the package must be in resalable condition. 
Returned items must be received by Manx within 30 
days. A small restocking fee may be required. 


Discounts 

There are special discounts available to professors, 
students, and consultants. A discount is also available on 
a “trade in” basis for users of competing systems. Call for 
information. 
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Columns 

Dear DDJ, 

I have a few comments re- 
garding Cortesi's article on 
disk timings in the Septem- 
ber 1985 issue. I ran the BA- 
SIC timing program on 
TESTFILE installed on a 
RAMdisk. The time was 64 
seconds compared to the 
122 for a floppy disk. Clear- 
ly, BASIC has a considerable 
overhead in its internal 
transfer of data, apart from 
the disk delays. (The copy 
command copied the RAM- 
disk file in less than a 
second.) 

Regarding the fast time 
of the copy command us- 
ing a floppy, it seems to me 
that PC DOS applies main- 
frame techniques to its 
disk transfers. The fastest 
way to do a file copy is to 
transfer cylinders of data 
at a time. Cylinder trans- 
fers do not have to start at 
the lowest-numbered sec- 
tor of the cylinder but can 
start at the first available 
sector and do a wrap- 
around. The program that 
reads the disk in this way 
simply maps the sector 
onto the appropriate RAM 
address and counts sectors 
until all sectors of the cyl- 
inder have been read. This 
is the reason for the speed 
of a program such as copy. 

I cannot let the article’s 
implication that a freshly 
formatted disk has its first 
free data area lined up 
neatly on cylinder 1 pass 
without comment. The BA- 
SIC program and the text of 
the article imply that to 





conduct proper timings on 
a physical device such as a 
disk, the transfers should 
line up on complete cylin- 
ders. The first free space 
on a freshly formatted disk 
is on track O, sector 4, side 
1. Thus the file TESTFILE is 
misaligned on cylinders 
and is spread over 17 cylin- 
ders, not 16. If, for exam- 
ple, a program were to 
loop, reading the first nine 
sectors of TESTFILE in order 
to give timings of pure 
reading without head 
movement, there would in 
fact be a change of cylin- 
der, resulting in head 
movement. In the case of 
the file timings, however, 
the error is very slight, and 
the article should be noted 
carefully by anyone who 
wishes to write a fast oper- 
ating system for the IBM PC. 


Mike Lawrie 

22 Ilchester Rd. 
Grahamstown 6140 
South Africa 


Ear 
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Dear DDJ, 

I read with interest Dan 
Daetwyler’s comments on 
converting to DOS 3.0 (16-Bit 
Software Toolbox, Decem- 
ber 1985). As a DOS 2.1 hack- 
er, | have a few comments 
to make. In spite of his stat- 
ed distaste for DOS x.0 bugs, 
I assume that he is using 
DOS 2.0 because the 20-han- 
dle limit per process is pre- 
sent, and enforced, al- 
ready in DOS 2.1. 

The limit is necessary be- 
cause at address 18h in the 
Program Segment Prefix, 
DOS keeps a 20-byte array 
for translating the user’s 
file handle into another 
number that DOS uses as an 
index into its array of files. 
I doubt that this table is 
longer in DOS 2.0 because 
the segment address of the 
environment is kept at ad- 
dress 2C. Assuming the 
mechanism to be the same 
in DOS 2.0 as in 2.1, he is 
causing a number of po- 
tential bugs. First of all, 


BELIEVE WHAT IT 
SAYS To Do NeXT 





these extra file handles 
won't be closed automati- 
cally when the program 
terminates or receives a 
Ctrl-Break. More impor- 
tant, those extra file han- 
dles may have their table 
entries stomped on by 
whatever DOS does with 
addresses 2E-5B. 
Assuming that DOS 3.1 
uses this same mechanism, 
he might be able to get 
around the 20-handle limit 
by maintaining his own 
longer version of this table 
elsewhere. In fact, he can 
do everything with one 
file handle. For example, 
to open a file, he could first 
set [18h]=OFFh. The OPEN 
function call will return 
file handle 0, and he can 
move the internal DOS file 
index from 18h to his own 
table. Then when he 
wants to use the file, he 
can set [18h] to that file in- 
dex and call DOS with file 
handle 0, and the DOS func- 
tion will refer to the de- 
sired file. I should note that 
he will have to close all 
files himself upon pro- 
gram termination (normal 
or otherwise). Also, I have 
not tested this approach, so 
I give no guarantees. I 
merely note that COM- 
MAND.COM does a similar 
trick when bypassing I/O 
redirection for the “Abort, 
Retry, Ignore?’ message. 


Paul Vojta 
591 Orange St. 
New Haven, CT 06511 


Dear DDJ, 

In your July 1985 issue, 16- 
Bit Software Toolbox be- 
gan with the line ‘One of 
the most novel features 
added in Version 2 of MS 
DOS is the concept of ‘instal- 
lable device drivers.’ ”’ I 
would like to say that this 
concept may be new and 
novel for Microsoft and MS 


Dr. Dobb’s Journal, May 1986 


MS is a trademark of 
trademark of AT&T; VAX/VMS is a registered trademark of Digital Equipment 
Corporation 
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A lot of people mistakenly assume that the 


more a piece of software costs, the better it is. 


And a lot of software companies take 
advantage of that. 

At Wendin we think quality software can 
and should be affordable. That’s why all our 
products are priced at $99. 

Take our Personal Operating Systems 
developed for the IBM PC and true 
compatibles. These include PCUNIX™ and 
PCVMS™, both written with our powerful 
software construction set, the Operating 
System Toolbox". 

Similar to AT&T's CNIX operating system, 
PCUNIX has the most popular UNIX features, 
including more than 59 utilities. And we're 
adding new features all the time. 

PCVMS is our version of the versatile 
VAX/VMS operating system, which duplicates 
nearly all the system services and many of 
the commands found on the popular 
mainframe original. 

Because PCUNIX and PCVMS were 
developed with the Operating System 
Toolbox, programs written on either system 


® 
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© Copyright 1986 Wendin, Inc. The people 
software tools 


Microsoft, PC-DOS is a trademark of IBM; UNIX is a PCUNIX, 
are 


Circle no. 112 on reader service card. 


CHENEY, WA 99004 


who make quality 
affordable. 


registered trademarks of Wendin, Inc. 
PCYMS, Operating System Toolbox, and Personal Operating System 





Are You Listening? 


can access over 80 enhanced system 
services built into the Operating System 
Toolbox kernel. And like all operating 
systems built with the Operating System 
Toolbox, these multitasking, multiuser 
systems use the MS-DOS file system and run 
well behaved MS-DOS programs. 

In addition to our Personal Operating 
Systems, we've developed one of the 
simplest and most powerful text editors on 
the market. XTC®. Combining a multitasking 
macro language with multiple linkable 
windows and buffers, XTC outperforms 
everything in its class. 

It also costs less than anything in its class. 
And it comes with complete source code. 

All our products do. 

Of course, if you're one of those people 
for whom money is no object, all of this may 
not interest you. But for the rest of you, we'll 
say it one more time. 


Wendin. $99 


Thanks for listening. 
ORDER HOTLINE 


(509) 235-8088 


— -FRI., 8-5 PACIFIC TIME) 
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Foreign orders inquire about shipping. 
Domestic orders add $5.00/1st item, 
$1.00 each additional item for shipping 
handling, and insurance. 

Washington residents add 7.8% sales tax. 
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(continued from page 8) 


DOS but it is certainly not a 
new and novel concept for 
other operating systems 
available for microproces- 
sors. 

The OS-9 operating sys- 
tem has had the concept of 
user-installable device 
drivers since its initial 6809 
Level 1 release in 1978. In 
fact, OS-9 is totally modular 
in nature and allows for 
the user addition of new 
device descriptors, device 
drivers, and new file man- 
agers if required. On top of 
supporting installable driv- 
ers, OS-9 has included the 
‘novel’ MS DOS concepts of 
hierarchical directory 
structures and pipes. OS-9 
also gives full support to 
I/O redirection, multipro- 
cessing, and multitasking, 
concepts much more akin 
to Unix. 

OS-9 may not be as well 
known as MS DOS is, but it 
does have a large follow- 
ing in the 6809 and 68Xxx 
world today and is grow- 
ing rapidly. MS DOS has 
added nothing novel to its 
OS; it is adding features 
that are expected and re- 
quired for an OS in today’s 
world. These features have 
been around in OS-9 and 
OS-9/68000 for some time. 

Tim Harris 

Microware Systems 

Corp. 
1866 N.W. 114th St. 
Des Moines, IA 50322 


Dear DDJ, 
This letter has a twofold 
purpose. The first address- 
es the source code LJ.C giv- 
en in the September 1985 
16-Bit Software Toolbox, 
and the second addresses C 
source code listings for “A 
New Shell for MS DOS, Part 
1: IBM Cursor Control and 
an Fgets That Edits” in the 
December 1985 C Chest. 
When I tried to run the 
LJ.C program, it would al- 
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ways hang up on the end 
of the first file to be print- 
ed. I traced the problem to 
the way that the end of file 
is found in the printpage( ) 
switch. K & R states that 
the variable c should be de- 
clared as type int so that 
the end of file (EOF) can be 
properly stored and tested 
for. Bringing the source 
code in line with K & R by 
changing the variable c to 
type int and changing \377 
to EOF, which should be 
defined in stdio.h, cleared 
up the problem. Listing 
One, page 68), gives the re- 
vised source code with this 
correction included and 
modified to allow either 
Lattice’s C compiler or 
Computer Innovations’ 
C86 compiler to be used. 

Also, a minor problem 
occurred with the source 
listing of LJ.C. It was hard to 
distinguish between the 
letter / (ell) and the number 
1 (one) in the listing. This 
was especially trouble- 
some in the escape codes to 
the HP LaserJet printer, 
where these two appear 
often right next to each 
other. It would be conve- 
nient if a typeset that dif- 
ferentiates between these 
two were used in source 
code listings. 

There is a problem with 
the source listing for the 
new shell for MS DOS in De- 
cember’s C Chest that con- 
cerns the function scur( ). 
Pagenum is passed as an ar- 
gument but is not declared 
in scur( ). This is a syntax 
with which I am not famil- 
iar, nor is it a syntax that I 
could find in_ either 
K & R or several other 
books on C. An explanation 
of this syntax in the next C 
Chest would be greatly 
appreciated. 

To put the above prob- 
lems in perspective, I must 
say that DDJ is the best 
magazine I have found for 
programmers. I started 
learning C about three 


years ago solely by myself 
from books. It was not un- 
til a year and a half ago 
when I discovered DDJ that 
my real insight into pro- 
gramming started to sur- 
face. I attribute a lot of this 
to your fine magazine and 
the quality of the articles 
published. I look forward 
to each edition of DDJ more 
than I do to any other com- 
puter magazine. 

Raymond Moon 

16005 Pointer Ridge Dr. 

Bowie, MD 20716 


Ray Duncan replies: 

The program as printed in 
the September 1985 DDJ 
works properly when 
compiled with Lattice C, as 
was stated in the column. 
However, Mr. Moon's 
changes to the program to 
make it ‘‘standard” are cor- 
rect, and will be helpful to 
DDJ readers who use other 
C compilers. An updated 
version of the program is 
available in Data Library 2 
on the CompuServe DDJ 
Forum. 


Allen Holub replies: 
Mr. Moon is referring to: 


scur( posn, pagenum ) 
short posn; 


{ 
} 


Here posn is of type short 
int (the int is implied), and 
pagenum, because it’s not 
declared explicitly, is as- 
sumed to be of type int. 
That is, pagenum is de- 
clared implicitly by con- 
text. A formal argument 
list is one of two places in C 
where the type of a vari- 
able doesn’t have to be 
spelled out. (The other is a 
subroutine call: If the type 
of the return value of a 
subroutine isn’t declared 
before the subroutine is 
used, the compiler as- 
sumes that the subroutine 
returns an int.) Implicit 
declarations are used in 


the library documentation 
of most compilers. I looked 
for a reference in K & R, 
and all that I could find is: 
“All variables must be de- 
clared before use, al- 
though certain declara- 
tions can be made 
implicitly by context” [Ker- 
nighan & Ritchie, The C 
Programming Language 
(Englewood Cliffs, N.J.: 
Prentice Hall, 1978), 36]. 
This is not really satisfac- 
tory. I’m sure it’s spelled 
out in more detail some- 
where in the book, but I 
couldn't find it. Every com- 
piler that I know of sup- 
ports implicit argument 
declarations though. 


DDJ 


(Listing begins on page 68.) 
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Those who insist on C compiler performance 
are very big on Mark Williams. 


And the compiler is just part of our total C Programming System. 


These and other powerful 
utilities now included in the C 
Programming System: 

* make: compiles only what's necessary 
from multiple modules, a powerful pro- 
gramming discipline 
* diff: identifies differences between two files 
* m4: macroprocessor expression editing 
and substitution 
° egrep: extended pattern search 
* MicroEMACS: full screen editor with source 
COMPILER FEATURES 
¢ Runs under MS-DOS 
¢ Full Kernighan & Ritchie C with recent 
extensions including void and enum 
¢ Register variables for fast, compact code 
¢ Full UNIX™ compatibility and complete 

libraries 


¢ Large and small memory models 

¢ MS-DOS linker compatibility 

° 8087 Support 

° One-step compiling 

* English error messages 

* ROMable code 

¢ Linker, assembler, archiver 

¢ Extensive third party library support 

csd C SOURCE DEBUGGER 

* Debugs at C source level without assembly 


language 
¢ Separate evaluation, source, program and 
history windows 
* Can execute any C expression 
¢ Capabilities of a C interpreter, but runs in 
real time 
¢ Set trace points on any statement or variable 





© 1985 Mark Williams Company 
UNIX is a registered trademark of Bell Labs. 


Mark Williams C compiler has earned a place 
in some very big companies for some very good reasons: 
it proves the benchmarks right with the speed, code 
density, consistent performance and expert support 
required in professional development environments. 

But a total development tool shouldn’t stop with 
compiling. Or go on and on with extras that add up and up. 

Only Mark Williams C Programming Systems 
includes the csd C Source Debugger with true source 
level debugging to speed your programming job. 

And only Mark Williams new 3.0 version includes 
utilities like “make” to make quick work of even the 
largest projects. 

From source code to final product, only one takes 
you all the way: Mark Williams C Programming System. 
All for only $495. Ask about our 60-day money back 
guarantee when you call 





1-800-692-1700 to order today: Mark 
You'll be big on the total C oe 
Programming system from Company 
Mark Williams, too. Chicago, linole 60614, 


*In Illinois call 312-472-6659. 


Circle no. 102 on reader service card. 
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Keep it Quiet 


The fact that we can devel- 
op technology to make 
computers speak and un- 
derstand human speech is 
not sufficient reason to let 
them do so. Now that pro- 
gress has been made in the 
fields of speech synthesis 
and recognition, a great 
rush seems to be on to de- 
velop voice applications to 
capitalize on the technolo- 
gy. Many, if not most, of 
these applications strike 
me as worse than useless. 
There is a simple reason for 
this: For now and probably 
for decades to come, voice 
represents a lousy interface 
between man and ma- 
chine. 

Consider it from the first 
direction—computer voice 
synthesis. Computer 
speech might be a nice 
gimmick for a game, but it 
is totally inappropriate for 
most serious applications. 
The purpose of a good user 
interface is to make things 
easier for the user. Let’s 
compare a computer voice 
message with the simple 
message tone and text on 
the screen that is common 
in many of today’s applica- 
tions. When the machine 
must gain the user’s atten- 
tion, a short tone is more 
than adequate for the task. 
Such a tone can register in 
the user’s mind without 
demanding instant atten- 
tion, thus allowing the user 
perhaps to complete a 
train of thought. Series of 
tones can indicate degrees 


by Daniel 
Appleman 


© 1986 by Daniel Appleman. 
Appleman is a hardware 
and software designer at 


Microlabs, in Sunnyvale, 
Calif: 
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of urgency. The important 
thing is that such a tone 
leaves the user in control. 
The user can decide when 
and how to respond and 
how much attention to 
give to the machine. 

With a computer voice 
message, the situation is 
radically different. The 
voice not only interrupts 
whatever the user is doing 
but also demands that the 
user interpret the message 
immediately. Will it be- 
come acceptable in our so- 
ciety for a computer to be 
able to interrupt a conver- 
sation between people? I 
certainly hope not. 

A voice message can also 
be misunderstood easily, 
especially with many of to- 
day’s voice synthesizers, 
which are devoid of ex- 
pression and difficult to 
comprehend. Even the 
good ones may require sev- 
eral repetitions of a mes- 
sage for full understand- 
ing—after all, even people 
often need to repeat them- 
selves. A screen message 
can be studied at leisure. 

Worse yet, there is a ten- 
dency to make some ma- 
chines talk that were clear- 
ly meant to remain silent. 
Most people do not require 
a lecture on purchasing 
stamps from the stamp ma- 
chine in the post office. I do 
not appreciate a hidden 
voice telling me to put on 
my seatbelt, regardless of 
how nice the_ voice 
sounds—a pleasant buzzer 
and light that can be dis- 
connected easily are suffi- 
cient. 

The situation with voice 
recognition is even worse. 
Let’s assume that such rec- 
ognition systems will be 
perfected and will achieve 
very high (say, more than 
95 percent) word recogni- 
tion rates with very large 
vocabularies and speaker 


independence. Until that 
time, voice recognition sys- 
tems will continue to re- 
quire significant discipline 
on the part of the user in 
terms of care in pronuncia- 
tion and adaptation to the 
machine’s vocabulary. Ai- 
though a 95 percent word 
recognition rate is proba- 
bly more than adequate 
when people speak with 
each other, computers 
with this ability will still be 
limited because word rec- 
ognition is not sufficient. 
When people communi- 
cate with each other, they 
use many more clues to fill 
in where word recognition 
leaves off. Expression, tim- 
ing, context, eye contact, 
body language, and even 
subconscious lip reading 
are important parts of the 
communication process. 
Until computers can take 
all of these into account, 
they will be limited in their 
capability to understand 
the user unless the user 
pays conscious attention to 
the communication pro- 
cess. This defeats the origi- 
nal goal of making the user 
interface ‘‘friendly.’’ At 
least with text input, peo- 
ple are accustomed to such 
discipline. It is probably 
possible for people to learn 
to communicate verbally 
without using nonverbal 
clues—but is this really de- 
sirable? Such discipline 
would undoubtedly carry 
over to society as a whole. It 
is one thing to make ma- 
chines more human, but 
should we encourage a 
process that could make 
communication between 
people more machinelike? 
Several environmental 
problems are created 
when attempting to devel- 
op a voice communication 
system, too. Such systems 
are often intolerant of 
background noise, requir- 


ing the user to speak loud- 
ly into the microphone in 
order to overcome the 
noise. An office with such 
machines would also have 
significant noise generated 
just by people talking to 
their computers. 

There are some applica- 
tions for which even today 
computer voice systems 
can be useful. They enable 
computers to be used by 
the blind. They can allow a 
degree of voice control of 
computers over the tele- 
phone. They allow voice 
mail systems to be built. 
Future applications should 
include voice writers 
(voice-to-text typewriters) 
and translating systems. 

For now, though, the 
mad rush to incorporate 
voice systems into com- 
mon computer applica- 
tions is premature. Enter- 
ing information into a 
database is much more ef- 
ficient via a keyboard, and 
system control can be han- 
dled very nicely using to- 
day’s sophisticated user-in- 
terface systems and 
pointing devices. 

Someday my argument 
will no longer be valid. 
The HAL 9000 computer in 
the movie 2001—A Space 
Odyssey was capable of in- 
terpreting subtle nonver- 
bal clues (including lip 
reading). It was also capa- 
ble of learning politeness, 
signaling that it was about 
to speak with a short, elec- 
tronic ‘‘throat clearing.” 
When such computers are 
possible, voice communi- 
cation will become both 
convenient and neces- 
sary—until then, let’s keep 
them quiet. 


DDJ 
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Step-by-step tutorial, demo programs with source code included! 


Borland introduces Turbo Prolog, 
the natural language of 
Artificial Intelligence. 


Prolog is probably the most 
powerful computer programming 
language ever conceived, which is 
why we've made it our second 
language—and “turbocharged” it to 
create Turbo Prolog.” 

Our new Turbo Prolog brings 
supercomputer power to your IBM® 
PC and introduces you step-by-step to 
the fascinating new world of Artificial 
Intelligence. And does all this for an 
astounding $99.95. 








~ Turbo Pascal the way you 


















Pay Turbo Prolog is to Je Even ifyou've never  “uld compare Turbo Pascal to 
S Prolog what Turbo > programmed before, Machine language. : 
Pascal® is to Pascal! our free tutorial will You get the complete — 
Our Turbo Pascal astonished get you started right away Turbo Prolog 
everyone who thought of Pascal You'll get started right away - programming 
as “Just another language.”"We because we have included a for only $99.95 
changed all that—and now Turbo complete step-by-step tutorialas You get, a complete Turbo 
Pascal is the de facto worldwide part of the 200-page Turbo Prolog Prolog development system 
standard, with hundreds of Reference Manual. Our tutorial ~—_ including: 
} Isles of enthusiasts —_ will take you by the hand and = The lightning-fast Turbo Prol 
eyes, SNdusersin teach you everything you're likely incremental compiler and the 
, universities, to need to know about Turbo interactive Turbo Prolog editor. 
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B cctenks For example: once you've manual which includes the step- 
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fessional program- — gystems utilizing Turbo Prolog’s query language database 
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Turbo Prolog 1.0 
Technical Specifications 
Programming System Features 


cae Compiler: Incremental compiler gen- | 


erating native in-line code and linkable 
object modules. The linking format is 
compatible with the PC-DOS linker. Large 
memory model support. Compiles over 2500 
lines per minute on a standard IBM PC. 


(7 Interactive Editor: The system 
includes a. powerful interactive full-screen 
text editor. If the compiler detects an error, 
the editor automatically positions the 
cursor appropriately in the source code. At 
run-time, Turbo Prolog programs can call 
the editor, and view the running program’s 
source code. 


F7 Type System: A flexible object-oriented 
type system is supported. 

(7 Windowing Support: The system 
supports both graphic and text windows. 
7 Input/Output: Pull 1/0 facilities, 
including formatted I/O, streams, and 
random access files. 


1 Numeric Ranges: Integers: —32767 to 
32767: Reals: 1E—307 to 1£ +308 

7) Debugging: Complete built-in trace de- 
bugging capabilities allowing single 
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Call (800) 255-8008 
in CA call (800) 742-1133. 
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CA and MA res. add applicable sales tax $ ___ 
Amount enclosed: $ 

This price includes shipping to all US cities 

Payment: VISA MC __ Bank Draft Check 


Credit card expiration date: __/__ 
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Carefully describe your computer system: SU11 
Mine is: __ 8-bit __ 16-bit 
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The disk size | use is: 0 3%" O Su" 08" 
NOT COPY PROTECTED 
*60-DAY MONEY-BACK GUARANTEE 


Name: 
Shipping Address: 
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Telephone: 
CODs and purchase orders WILL NOT be accepted by 
Borland. Outside USA make payment by credit card or 
International Postal Money Order. 

“YES, if within 60 days of purchase this product does 
not perform in accordance with our claims, please call 
our customer service department and we will gladly 
alrange a refund. 
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DDJ ON LINE 


The following is a thread of 
conversation from one of 
the message boards on the 
DDJ SIG: 


Fm: Levi Thomas 
76703.4060 

I found a press release in 
the morning mail here at 
DDJ which actually con- 
tains some interesting in- 
formation (rare indeed). 
Skipping over the fanfare 
and David vs. Goliath anal- 
ogy, it says that Microstuf 
software company has 
filed suit against Softklone 
over the “look and feel”’ of 
a terminal program that 
Softklone distributes. The 
program is called Mirror 
and is a clone of Micros- 
tuf’s Crosstalk XVI. 

There was trouble of this 
kind concerning the pro- 
posed release of GEM but it 
was settled out of court, so 
no legal precedent was set 
at that time. Has this sort of 
thing been brought to court 
before? Softklone’s press 
release goes on to say that 
Microstuf did not contend 
that its source code, object 
code, or user manual were 
copied, but claimed copy- 
right infringement based 
on a single input screen. So 
what do you think? Should 
the “look and feel’ of a 
computer program be 
copyrightable? 


Fm: Bob Perez 76003,102 

Hmm. Well, this area is cer- 
tainly new, and it’s hard to 
tell what the courts will do 
with it. Some observations: 
Close cases tend to be de- 
cided on peripheral details 
in order to bring the bal- 
ance of evidence in align- 
ment with the decision 
rendered. It’s often said 
(and the juridicial positiv- 
ists have not quarreled 
much with this) that judges 
make the law, not the legis- 
lature, and that they do so 
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according to their percep- 
tions of prevailing moral 
trends. Hence the liberal- 
ization of criminal proce- 
dures by the Warren Court 
during the 1960s and the 
other end of the spectrum 
currently underway by 
the Burger Court. If this is 
so, then we can expect that 
judges will soon be bend- 
ing over backwards to try 
and fashion some seat-of- 
the-pants remedies for 
what is currently being 
touted as “the threat of pi- 
racy.’ Expect to see it hap- 
pen first in the copy-pro- 
tection area (particularly 
as the issues are raised by 
the Shrinkwrap licensing 
notion) and then expect it 
to expand in other, deeper 
directions. Perhaps Apple 
could have presented a 
good test case with its 
threats against DRI... . 

I can immediately see a 
couple of major strikes 
against Softklone in this 
case; points that can only 
help Microstuf in its effort 
to sway a judge. Naming 
their company Softklone 
was stupid. Period. But 
then naming their product 
Mirror was tantamount to 
mailing a “I Dare You to 
Sue Me’ bumpersticker to 
Microstuf’s corporate 
counsel. This reminds me 
of the obscenity litigation 
that Al Goldstein went 
though with his magazine. 
It was bad enough calling it 
Screw, but having it post- 
marked from Intercourse, 
Pennsylvania. ... 


Fm: Chris Dunford (INF) 
76703,2002 

How is the Crosstalk clone 
conceptually different 
from, for example, the 
“store brands” that most of 
the big supermarket chains 
sell? You'll find that they 
sell three or four types of, 
say, mouthwash: One looks 


identical to Scope, one to 
Listerine, and so on. They 
really go to a lot of trouble 
to make these things look 
like the original: same col- 
oring, same bottle shape, 
same scent, etc. My bet is 
that, if Softklone has the 
pockets to put up a decent 
fight, Microstuf will fold its 
tent quickly. I’ve got a 
hunch it’s a scare tactic, 
and that Les Freed and the 
gang know they can't win 
in court. Copyrighting 
ideas is difficult. 


Fm: Bob Perez 

I think there are major 
conceptual differences be- 
tween the packaging of 
disposable consumer prod- 
ucts and the appearance of 
a computer program's 
startup screen. Still, I think 
the point’s worth noting. 
Maybe a better analogy 
could be found in the mov- 
ies. Suppose I release a film 
that begins with loud blar- 
ing trumpets and a screen 
that looks very similar to 
the opening screen in Star 
Wars? Suppose the movie 
is called WarsClone, and 
suppose my company’s 
name is LucasLike Films, 
Ltd. I’d suspect that Lucas’s 
attorneys could start mak- 
ing their retirement plans 
at that point. 


Fm: Chris Dunford 

Hmm, not sure that’s a good 
analogy, either <scratch- 
ing head>. Seems to me 
that there’s a difference be- 
tween the ‘‘feel”’ of a movie 
and the ‘feel’ of a pro- 
gram. A film has nothing 
other than feel; it’s an en- 
tirely visceral product. If I 
“clone” the feel of a movie, 
I have in effect stolen the 
entire product. On the 
other hand, a program has 
more than visceral effects: 
it does something. And I 


have just argued myself 


into a corner, haven't I? 
The clone-maker has 
cloned both the feel and 
the tangible effects of the 
program. Hmm. [ still think 
that mouthwash provides a 
good analogy. Not sure I see 
how cloning mouthwash is 
conceptually different 
from cloning Crosstalk. 


Fm: Todd M. Roy 70455,140 
...1 think what has hap- 
pened is that DRI folded too 
fast to Apple and that a lot 
of the big name software 
companies are coming out 
of the woodwork now to 
have a try at their imitators. 


Fm: Dick Blowers 
71555,361 

I think of a computer pro- 

gram as a tool because 

that’s the way I use it. I find 

it hard to think of ‘‘using” a 

novel or a movie. 


Fm: Todd M. Roy 70455,140 
This sort of stuff doesn't 
really bother me. It would 
bother me if one company 
took another company to 
court over the basic con- 
cept of a program, rather 
than a clone-like look. For 
example: Lotus taking ev- 
erybody who ever made a 
spreadsheet program to 
court. 


Fm: Robert Grimble 
75206,2005 

The problem is that you are 
not copyrighting an idea. 
You are copyrighting a giv- 
en display. The problem 
with the Proctor and Gam- 
ble illustration is that bottle 
shapes are covered by de- 
sign patents, and there are 
a lot more on file than 
there are copyrights on 
screen displays. Therefore, 
there is a lot wider cover- 
age by the copyrighted 
screens, as a practical mat- 
ter. You are right that the 
deep pocket theory has a 
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A“C” programmer’s tool to increase screen develop- 
ment productivity for the IBM PC. Security checking and 
help screen display are available at both the screen 
and field level. The automatic conversion of data types, 
to and from ASCII screen format, and the many other 
productivity-oriented features, set ZVIEW apart from 


the rest. 
Screen Painter Highlights: 


¢ Border colors and all character attributes and colors 
are supported. 


e Draw single or double lined boxes using 
preset key strokes. 


¢ Two field sensitivity settings to facilitate the moving 
and adding of fields, without destroying existing 
field characteristics. 


e Three types of fields are available: “Protected,” 
“Unprotected” and “Heading.” The number of fields 
is limited to 600! 


¢ Both 40 and 80 column screens are supported. 


Optional Field Characteristics: 
¢ Choose left or right justification, with zero or blank fill. 


e Automatic key stroke conversion to upper or lower case. 


¢ Edit fields to be numeric (signed or unsigned), 
decimal (zero to six decimals supported), alpha 
or alphanumeric. 


¢ Display numerical values with or without 
commas inserted. 


e All “C” data types are supported, including a special 
long value which is displayed as a decimal field. 


¢ From and to range checking and character 
matching edit. 


e Security level settings to restrict inquiring or updating 
of a field. 


¢ Override ZVIEW’s default tabbing sequence. 
e Assignment of a single or multiple screen help file, 


to be displayed when the field level help key is pressed. 


¢ Compare one field to three other fields on the 
Current screen. 






TO ORDER CALL TOLL FREE 1-800-423-0930 


Customer Service and Nevada residents: 
call 1-702-798-5910 


IBM PC, XT, AT and PC-DOS are trademarks of International Business Machines. 


MICROSOFT and MS-DOS are trademarks of Microsoft. 
ZVIEW is a trademark of Data Management Consultants 
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Program Interface Highlights: 

e Only nine run-time library functions control all aspects of 
the program to screen interface. 

¢ Dynamically change any field characteristic at run-time. 


e Awide range of run-time variables to further customize 
ZVIEW’s operation. 


e One call fo ZVIEW’s “Waitkey” function, performs all field 
edits and program to end user interface. 


e Automatic data conversion of all data types to and from 
data structures and buffers. Data goes directly from data 
type to screen format and back, with one call each way. 


¢ Display screen files from disk or memory. 

- Scroll function replaces vacated lines with data 
you provide 

Windows: 

¢ Windows are a built in feature of ZVIEW. 

¢ Automatic handling of the window overlay process. 

e Windows are fully functional for data display and 
data eniry. 

Requirements: 


¢ Microsoft 3.0, Lattice 3.0, and Aztec 3.2e compilers 
currently supported. 


¢ IBM PC, XTAT or compatible, MS/PC DOS, one 320k drive, 
a color graphics adapter and any 80 column display. 
Price: 
e $245 
Includes manual and a detailed program example. 
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Or Write: Data Management Consultants 
5325 So. Valley View Blvd. Suite #7 
Las Vegas, NV 89118 


Master Card, Visa or company 
check accepted 





DDJ ON LINE 
(continued from page 14) 


lot to do with how cases 
come out, but, when it 
comes to a user interface, 
there is no reason why a 
software developer should 
not be protected. It costs a 
lot of bucks and takes more 
than a little talent for a 
company to come up with 
a friendly and useful user 
interface. That kind of R&D 
is exactly what patents and 


copyrights are supposed to 
protect. 


Fm: Bob Perez 

Well, these are very tough, 
interesting issues. On the 
one hand, I agree that in- 
novation and creativity are 
stifled when clones are let 
loose upon the world. On 
the other hand, Apple's po- 
sition on their proprietary 
interface seems to assure 
that the marketplace will 
develop in many different, 
necessarily incompatible 
directions, at the expense 
of the very users with 
whom Apple seeks solidar- 
ity. Of course, it’s within 
Apple’s rights to milk it 
while it can. I don’t think 
it’s necessarily in their best 
interests to do so, however. 


Fm: Jim Scheef 76505,1351 

Your comment on Apple 
forcing the marketplace to 
develop many different 
user interfaces is an impor- 
tant point. Sometime in the 
future (probably counted in 
weeks in this industry) 
someone will realize that 
people are having a hard 
time learning to use micro- 
computers. The reason 
they will surmise is that the 
industry has failed to pro- 
vide a standard interface 
that people can learn and 
then use for any computer. 
This same person, because 
he or she is also a member 
of Congress, will then pro- 
pose legislation to correct 
this obvious oversight: You 
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have already seen the re- 
sults of this type of legisla- 
tion in many other areas. 
Can you imagine the results 
if Congress’ designed 
icons????!!! Standardization 
may not be all that far off as 
many industry watchers 
believe IBM will move the 
TopView interface to VM/ 
CMS and then on to all other 
operating systems as well. 
Since TopView doesn't use 
icons, it may not be totally 
germain to the thread, but 
Apple and others should 
realize that no one of them 
is going to get all of the 
graphics interface business, 
so why not agree on com- 
mon icons that everyone 
can learn (the way rest- 
room signs have become in- 
ternationally standard) and 
use regardless of language. 


Fm: Keith Moore 
73267,1570 

About this icon business: I 
seem to recall that when 
Apple came out with the 
Mac they were talking 
about all of the symbols 
stamped into their cabinet, 
such as the telephone re- 
ceiver to indicate the mo- 
dem port. Wherever an in- 
ternational standard for 
such a symbol existed, they 
used it. Where there was 
no standard symbol, they 
hoped that theirs would be 
adopted. Why should icons 
on the screen be different? 
Also, I seem to remember 
seeing the trash-can icon 
on some old Altos software 
many years ago. 


Fm: Jim Scheef 

The interpretation of copy- 
right law is an interesting 
issue. Congress enacted the 
original copyright law to 
encourage authors to pub- 
lish their works; i.e., make 
the works public. In return, 
the authors got the rights to 
publication, performance, 
etc. for a limited time. With 
a book it is easy to deter- 
mine exactly what consti- 


tutes the “work’’—it’s the 
words and pictures. What 
is the “words and pictures” 
of a piece of software? Is it 
the source code? Remem- 
ber, to obtain a copyright, 
the author must “make 
public” his work. Or is the 
work the program's output 
(results)? If it is the results, 
then does that mean that 
Lotus owns all of the work- 
sheets I put together using 
1-2-3? After all, they are the 
results or output of the pro- 
gram. Or have I, by writing 
the spreadsheet, modified 
the program to produce a 
different result? I think 
that’s a violation of the li- 
cense agreement! The is- 
sues aren't exactly clear 
and I doubt we'll resolve 
the issue here. Going back 
to the Lotus example, does 
a program's output stop 
(for the purposes of copy- 
right) with the _ intial 
screen(s) provided by the 
publisher? If this is true, 
then how will anyone ever 
protect an artificial intelli- 
gence program that modi- 
fies it’s output depending 
on the responses of the 
user? How would you 
know if someone had 
cloned such an AI pro- 
gram? Even the author 
might not know all of the 
program’s possible outputs! 


Fm: Robert Grimble 

I recall that one judge com- 
mented in a computer case 
that “if it looked the same 
it was the same.” There is 
no reason why you can't 
copyright an input screen, 
and game manufacturers 
shoot film of various game 
screens and copyright 
them. I’m not a copyright 
expert, but I think that to 
win a copyright case you 
have to show actual pla- 
garism, which is unlike 
patents, where all you 
have to show is the use of 
the same device, process 
etc. 


Fm: Ran Talbott 
(ProgGnosis) 70506,60 

As I (mis?)understand the 
law, there are two sepa- 
rate issues here: The 
source code is clearly the 
“words and pictures” part. 
You don’t send diskettes or 
PROMs to the copyright of- 
fice: They are considered 
electronic representations 
of the original source. The 
appearance of the screen is 
treated as a separate work: 
Witness the Pac-Person 
clones that got stomped 
even though they ran on 
different machines and 
couldn't possibly infringe 
the source copyright. If 
Apple had successfully 
sued over their screen 
copyright, it could conceiv- 
ably become illegal for 
anyone to publish, say, a 
book or magazine article 
containing a screen repre- 
sentation of a spreadsheet. 
A win by Apple would say: 
“Yes, your names (data) are 
different, but overall it 
looks like what I sent to the 
copyright office. Pay up.” 


Fm: Todd M. Roy 

Another interesting point 
would be to make any 
copying of a program ille- 
gal. Since a program must 
be loaded in from a floppy 
disk to computer memory, 
this is a form of copying, 
and hence if all copying 
were illegal, running the 
program would be illegal. 
Don’t laugh, this isn't even 
a new point. 
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WIZARO C 


The new Wizard C version 3.0 sets new records for all out speed! 
It leaves other C compilers in the dust! When your project de- 
pends on that last ounce of speed, choose Wizard. 








“...The compiler’s perfor- 
mance makes it very useful 
in serious software develop- 
ment.” 

PC Tech Journal, 

January, 1986 


“Wizard’s got the highest 
marks for support.” 


“The Wizard Compiler had 
excellent diagnostics; it would 
be easier writing portable 
code with it than with any 
other compiler we tested.” 
Dr. Dobb's Journal, 

August, 1985 















For MSDOS applications, we 
provide the most features of 
any C compiler, plus a full 
range of third party software: 
PANEL 
Greenleaf Libraries 
Essential Software Library 
PLINK86 
Pfix86plus 
Microsoft Assembler 3.0 


For stand-alone applications, 
we supply a ROM develop- 
ment package that carries 
your program all the way to 
Intel Hex files ready for a 
PROM burner. 





The following SIEVE benchmark was run without register vari- 


able declarations on an IBM/PC with 640K memory and an 8087. For debugging, the compiler 


Exec Time Code Size EXE Size emits full Intel debugging in- 
Wizard C3.0 : 6.8 130 7,766 formation including local sym- 
Microsoft “Lae 186 7,018 bol and type information. 
Lattice 11.3 164 20,068 
Wizard C $450.00 
Fast executable code, with multiple levels of optimization. ROM Development Package $350.00 
Six memory Models, supporting up to 1 megabytye of code and data, Combined Package $750.00 
plus mixed model programming. 
Effective error diagnosis, including multiple source file cross-checking (617) 641-2379 


of function calls. 


A comprehensive runtime library, including fully portable C functions, 


MSDOS and 8086 functions. 
8086, 8087, 80186 and 80286 hardware support. Z R D 
Full Library Source Code included with package. SYSTEMS SOFTWARE, INC. 


ROM based application support, including a ROM development 11 Willow Court, Arlington, MA 02174 


package available to create Intel Hex files. 
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C CHEST 


Accessing IBM Video Display Memory and a Microsoit Bug 


Cs trictly speaking, it’s a real no-no 
to read and write directly to or 
from the IBM PC's display memory. 
You're supposed to go through the 
ROM BIOS routines. Unfortunately, 
though the BIOS is faster than DOS, 
sometimes it’s still not fast enough. 
This month I’m going to look at a set 
of C subroutines that talk directly to 
the IBM PC display memory. These 
routines are blindingly fast—blink, 
and you've missed the action. They ll 
work on all versions of the PC that 
exist now (at least all versions that 
use a monochrome adapter or equiv- 
alent—the Hercules graphics card is 
an equivalent), but they may not 
work on future hardware. In the 
process of writing these routines, I 
came across a bug in the way that the 
Microsoft compiler handles far 
pointers. I'll talk about this as I ex- 
plain the code. 

The routines supported are all in 
video.c (Listing One, page 72). They 
are: 


void _ setcur ( row, col ) 
int row, col; 


which positions the cursor at the in- 
dicated row and column; 


void getcur( rowp, colp ) 
int *rowp, *colp; 


which gets the current cursor posi- 
tion (notice that rowp and colp are 
pointers to places where the cursor 
positions will be put; 


void d_putc(c, attrib ) 
int c, attrib; 


by Allen Holub 


which writes a single character with 
the indicated attribute (more on attri- 
butes in a moment) at the current 
cursor position and then advances 
the cursor. Wraparound to the next 
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line is supported; however, if you 
write past the bottom-right corner of 
the screen, the cursor will roll up to 
the top-left corner (that is, the screen 
doesn't scroll). Three control charac- 
ters are supported: \r gets you to the 
beginning of the current line, \n gets 
you to the same column on the next 
line, and \b goes backward one char- 
acter. All other control characters 
print as funny-looking IBM graphics 
characters of some sort (smiley faces, 
hearts, or whatever). 
The next routine 


void d_puts( str, attrib ) 
char ‘str; 
int attrib; 


writes out a string, with the charac- 
ters having the indicated attribute. 
You must use \r\n to get to the left 
edge of the next line. 

Finally, 


clrs( attrib ) 
*str; 


void 
char 


clears the screen by filling it with 
blanks having the indicated attribute 
(that is, a reverse-video attribute will 
fill the screen with a white back- 
ground and nothing in the fore- 
ground; an underline attribute will 
fill the screen with underscores— 
that is, an underlined ‘ ’). 

Part of the header from Listing 
One is reproduced in Table 1, page 
20. NUMROWS and NUMCOLS define 
the screen size. VIDBASE is the base 
address of the display memory used 
by the monochrome adapter. The ad- 
dress is in cannonical form—that is, 


Oxbo00000 is actually address 
BOO00:0000. 


Three basic attributes are support- 
ed: NORMAL video, UNDERLINED char- 
acters and REVERSE video. These are 
mutually exclusive (you can’t have 
an underlined, reverse-video charac- 
ter). Two modifiers are supported, 
however: BLINKING and BOLD. The 
former causes the character to blink, 
and the latter causes it to be printed 
at high intensity. The modifiers may 
be ORed with each other and with 
any of the basic attributes. For exam- 
ple, a blinking, high-intensity under- 
lined character has the attribute 
BLINKING ‘BOLDUNDERLINED. 

Characters are stored in memory 
as 16-bit objects. The low byte holds 
the ASCII code, and the high byte 
holds the attribute. The CHARACTER 
type is a structure that lets you access 
the ASCII code and attribute indepen- 
dently, without doing a shift and 
mask operation. If p is a pointer to a 
CHARACTER, then p-—>letter 
changes the ASCII field and p — >attri- 
bute changes the attribute field. 

DISPLAY (on line 26) is a 25 X 80 ar- 
ray of CHARACTERS; it’s the entire dis- 
play area. Screen is a pointer to a DIS- 
PLAY. The far keyword is supported 
by the Microsoft compiler to ease 
mixed-model programming. Screen 
is declared here as a far pointer to an 
array—that is, the array can be any- 
where in memory and Screen is a 32- 
bit wide pointer to that array. If 
you're using the Lattice compiler, 
dispense with the far keyword and 
compile the module using the large 
data model. 

Note that Screen is a pointer to the 
entire array, not to one element of it. 
Consequently individual elements of 
the array must be accessed with 
square brackets. For example, a bold- 
face character can be written at row 
5, column 10 with: 


(*Screen)[5][10].letter = ‘c’: 
(*Screen)[5][10].attribute = 
NORMALBOLD; 


Dr. Dobb’s Journal, May 1986 


C Programmers! First database 
written exclusively for C 
is also royalty free 


“If you are looking for a sophisticated C Programmers database, db_ VISTA is it...” 
Dave Schmitt, President of Lattice, Inc. 


Designed exclusively for C,db VISTA™ 
is a royalty-free programmers’ DBMS. 
Both single and multi-user versions let 
you take full advantage of C through ease 
of use, portability and efficiency. 


Written in C for C Programmers 


All functions use C conventions so you 
will find db_VISTA easy to learn. db_ 
VISTA operates on most popular com- 
puters, and because it is written in C it can 
easily be ported to most computers. 


Royalty-Free, You only pay once 


Whether you're developing applications 
for a few customers, or for thousands, the 
price of db_ VISTA is the same. If you are 
currently paying royalties for a com- 
petitor’s database, consider switching to 
db_ VISTA and say goodbye to royalties. To 
help you make the change over to db_ 
VISTA, file transfer utilites are available for 
dBASE, R:base and ASCII files. 


More from your database applications 
with source code 


Source code includes all db__ VISTA lib- 
raries and utilities. 
1. Recompile our run-time libraries utili- 
zing non-standard compiler options. 
2. Create a debugging library including 
a function traceback by activating pre- 
processor commands embedded in the 
source code. 


Multi-user and LAN capability 


Information often needs to be shared. 
db_ VISTA has multi-user capability and 
Supports simultaneous users in either 
multi-tasking or local area networking 
environments, allowing the same C appli- 
cations to run under UNIX and MS-DOS. 


Faster execution 
without data redundancy 


Less data redundancy means reducing 
disk storage requirements and maximiz- 
ing data access performance. A customer 
evaluating a leading competitor's product 
prior to purchasing db_VISTA bench- 
marked db_VISTA’s retrieval time to be 
276% faster than a leading competitor. 


Complete documentation included 


User manual contains 193 pages, 8 dia- 
grams, 10 tables, appendices, an exten- 
sive index, plus a database application 
example. 9 chapters with complete in- 
structions. 


Introducing db_ QUERY" 


With db_ QUERY you can ask more of 
your database. db_ QUERY is a linkable. 
SQL-like ad hoc query and report writing 
facility. It’s also royalty-free. 


30 day Money-Back Guarantee 
We wish to give you the opportunity to 





try db_ VISTA for 30 days in your develop- 
ment environment and if not satisfied re- 
turn it for a full refund. 


Special Offer 


Free Falcon hard disk controller with 
purchase of db_ VISTA Multi-user with 
source.* 


Price Schedule 


db __ db __ 

VISTA QUERY 

Single-user $195 $195 
Single-user with Source S495 $495 
Multi-user $495 $495 


Multi-user with Source $990 S990 
Free 90 days application development support 
All software not copy protected. 


Call Toll Free Today! 


To order or for information, call TOLL 
FREE 1-800-843-3313, at the tone 
touch 700-992. 

VISA and MASTERCARD Accepted 


db_ VISTA Version 2.1 


Database Record and File Sizes 

¢ Maximum record length limited only 
by accessible RAM 

¢ Maximum records per file is 16.777,215 

¢ No limit on number of records or set 
types 

¢ Maximum file size limited only by 
available disk storage 

¢ Maximum of 255 index and data files 


Keys and Sets 

¢ Key lengths may be a maximum of 246 
bytes 

¢ No limit on maximum number of key 
fields per record - any or all fields may 
be keys with the option of making each 
key unique or duplicate 

¢ No limit on maximum number of fields 
per record, sets per database, or sort 
fields per set 

¢ No limit on maximum number of 
member record types per set 


Utilities 
¢ Database definition language processor 
¢ Interactive database access utility 
¢ Database consistency check utility 
¢ Database initialization utility 
¢ Multi-user file locks clear utility 
¢ Key file build utility 
¢ Data field alignment check utility 
¢ Database dictionary print utility 
¢ Key file dump utility 
¢ ASCII file import and export utility 


RAIMA’ 


CORPORATION 
12201 S.E. Tenth Street 
Bellevue, WA 98005 USA 
(206) 747-5570 
Telex: 9103330300 BCN RIVERTON 


Circle no. 206 on reader service card. 


Read what others say about db_ VISTA... 


“If you are looking for a sophisticated C 
programmers database, db_ VISTA is it. 
In either a ee or multi-user environ- 
ment, db_VISTA lets you easily build 
complex databases with many intercon- 
nected record types. The multi-user im- 
plementation handles data _ efficiently 
with a LAN and Raima’s customer sup- 
port and documentation is excellent. 
Source code availability and a royalty-free 
run-time is a big plus.” 

Dave Schmitt, President 
Lattice, Inc. 


“Not ‘yet another user-friendly database’, 

it is a DBMS aimed at the technical C 

programmer instead of the non-technical 
end-user”. 

Hal Schoolcraft, Data Based Advisor 

March, 1985 


“On the whole, I have found db_ VISTA 
easy to use, very fast with a key find, and 
powerful enough for any DBMS use I can 
imagine on a microcomputer’. 

Michael Wilson, Computer Language 
September, 1985 


Database Management System for C 


Features 

¢ Multi-user support allows flexibility to 
run on local area networks 

¢ File structure is based on the B-tree 
indexing method and the network data- 
base model 

¢ Run-time size is variable - will run in as 
little as 64K, recommended RAM size is 
256K 

¢ Transaction processing assures multi- 
user database consistency 

¢ File locking support provides read and 
wriie locks on shared databases 

¢ SQL based db_ QUERY is linkable 
and royalty free 

¢ Operating system support for MS-DOS, 
PC-DOS, Unix, Xenix or Macintosh 

¢ C compiler support for Lattice, Micro- 
soft. DeSmet, Aztec, Computer Innova-. 
tions, Xenix and Unix 

¢ File transfer utilities for ASCII, dBASE 
and R:base optional 


Independent Benchmark Results 
Eleven key retrieval tests on sequentially 
and randomly created key files. Bench- 
mark procedure adapted from “Bench- - 
marking Database Systems: A Systematic 
Approach” by Bitton, DeWitt, and Tur- 
byfill. December, 1983 


Total Retrieval Time of 11 Tests 
db_ VISTA 
Leading competitor 


:671.24 
:1,856.43 





1 (800) 843-3313 


at the tone touch 700-992 


: 5 ears ey) 


* Limited offer available to end-user purchases directly trom Raima Corporation. 
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© GHEST 
(continued from page 18) 


The parentheses are required be- 
cause the dot (.) has higher prece- 
dence than the +. Without the paren- 
theses, the expression evaluates to: 


*( Screen(5][10].letter ) = ‘c’; 


which is meaningless given the de- 
clared type of Screen (the compiler 
should kick out an error message). 
Because Screen is never modified, 
it should be possible to replace it 
with a constant. The procedure can 
be explained more easily by looking 
at 8080 code rather than 8086 code. If 
you want to modify memory loca- 
tion 0x100 in an 8080, you can Say: 


4#define MEM ((char *) 0x100) 
x = *MEM; 


Here, you re saying treat the number 
0x100 as if it were the contents of a 
character pointer, so *“MEM is the 
thing pointed to by the implied char- 
acter pointer. The problem is more 
complicated with an 8086 because of 
memory segmentation, but the syn- 
tax is more or less the same. Instead 
of saying: 


#define NUMROWS 25 
#define NUMCOLS 80 
#define VIDBASE 


# define NORMAL 
#define UNDERLINED 
#define REVERSE 


#define BLINKING 
#define BOLD 


typedef struct 


typedef struct 


{ 


char 
char 


letter; 
attribute; 


} 
CHARACTER; 


typedef CHARACTER 


DISPLAY far *Screen = 
(DISPLAY far *) VIDBASE; 
(*Screen)[5][10].letter = ‘c’; 


you should be able to say: 


#define SCREEN ( (DISPLAY far *) / 
VIDBASE ) 
(*SCREEN)[5][10].letter = ‘c’; 


SCREEN is treated as if it were the 
contents of a variable of type (DIS- 
PLAY far *). You can also move the * 
that precedes the use of SCREEN into 
the macro: 


#define SCREEN ( *( (DISPLAY far *) 
VIDBASE) ) 
SCREEN[5][10].letter = ‘c’; 


As it turns out, the foregoing works 
fine on the Microsoft compiler pro- 
vided that the indexes are constants. 
That is: 


SCREEN(5][10].letter = ‘*’; 


causes the following code to be 
generated: 


mov’ bx,—20480 

mov_ es,bx 

movi bx, 820 

mov BYTE PTR es:[bx],42 


Oxb0000000 /* Base address of video screen 


* in canonical form. 
7 


/* Basic attributes. Only one 
/* of these may be present. 
/* May be ORed with the above 


/* and with each other 


7 


DISPLAY[ NUMROWS ][ NUMCOLS ]; 


static DISPLAY far *Screen = (DISPLAY far *) VIDBASE; 


Table 1 
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where —20480 is Oxb000, 820 is the 
offset to row 5, column 10: 
2*((5*80)+10) and 42 is the *. Unfor- 
tunately, strange things happen 
when you try to replace the con- 
stants with variables: 


int 
int 


Row = 5; 
Col = 10; 


SCREEN Row I Col J.letter = ‘*’; 


generates the following: 


mov —Row,5 
mov —_Col,10 
mov ax,160 
imul _—Row 
mov  si,ax 
mov bx,__Col 
shl bx,1 
mov BYTEPTR 
(bx —1342177280|[si],42 
I don’t know’ where that 


— 1342177280 came from, but it’s 
wrong. When you use the Screen 
variable rather than the SCREEN con- 
stant, everything works fine, though. 

The final thing worth mentioning 
here is the clrs( ) routine (on line 114 
of Listing One). Here, rather than use 
Screen, I’ve speeded up the code by 
declaring a pointer to an individual 
CHARACTER and then cleared the 
Screen array as if it were linear, rath- 
er than two-dimensional. This saves 
all the multiplies implicit in an oper- 
ation involving square brackets. 

Note that redirection obviously 
won't work when you use these rou- 
tines for output, but redirection 
doesn’t work when you use the BIOS 
routines either. Also, be careful 
about mixing these routines with 
normal BIOS calls. If the cursor is up- 
dated by the BIOS, then the variables 
Row and Col used in video.c won't 
correspond to the real cursor posi- 
tion any more (the BIOS won't update 
them for you) and strange things will 
start happening on your screen. In 
spite of these problems and the lack 
of portability, direct screen writes 
are very nice to have, especially if 
you re creating a full-screen editor or 
similar program, in which you have 
to update the screen fast. 


Beating Dead Horses 
At the risk of being tedious, I’m bring- 
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ing up the subject of lvalues and 
pointers once more (this is the last of 
it, | promise). Steve Hersee (VP of mar- 
keting at Lattice and chair of the ISO 
working group in C) sent me the fol- 
lowing paper. It was written by Gary 
Merrill and Francis Lynch, also of Lat- 
tice. Steve points out that the letter 
was submitted to, and adopted by, the 
ANSI comittee, so I guess the other side 
wins. I hate to give up *( (T)P )+ 4, 
though. If you haven’t already, you 
should read last month’s column for 
background. The letter refers to sec- 
tions in an early draft of the standard 
that I don't have a copy of. It’s pretty 
understandable, though, even with- 
out the standard in front of you, and it 
makes some good points about 
Ivalues. 


Consequences of the 
Proposed Standard 
The decision to allow an ex- 
pression of the form (T)P to be 
an lvalue ‘‘for purposes of addi- 
tive operations on P’”’ (when P is 
an lvalue of pointer type and T 
is the name of a pointer type) 
appears to preclude the devel- 
opment of any coherent se- 
mantics for the C language and 
to prevent its implementation 
on a significant class of ma- 
chine architectures. It has the 
virtue, however, of bringing to 
light a number of places in the 
proposed standard where a 
lack of rigor and precision tend 
to leave the reader in a state of 
confusion. While this decision 
may initially appear plausible 
and even intuitively correct, 
the price one must pay for it 
quickly begins to seem exces- 
sively high, if not prohibitive. 
Consider the following: As- 
sume that P is an lvalue of 
pointer type and T is the name 
of a pointer type. Then we 
know by the above principle 
(see Section 4.2.4) that, within 
the context ++(T)P (and also 
within the context (T)P++), 
the expression (T)P is an lvalue. 
On the other hand, we know 
from Section 4.2.1 that + +(T)P 
is equivalent to ((T)P += 1). So, 
if ++(T)JP is syntactically (and 
semantically) acceptable, then 
so is ((T)P += 1). We also 
know (Section 4.14) that + = re- 
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quires an lvalue as its left oper- 
and, so everything appears to 
be OK so far, so long as we 
agree that in the context ((T)P 
+= 1) the subexpression (T)P 
is being used “for purposes of 
additive operations on P.”’ 

Now we also know (Section 
4.14.2) that ((T)P += 1) differs 
from ((T)P = (T)P + 1) “only 
in that” (T)P “is evaluated only 
once,’ and if this is the only dif- 
ference, then since the former 
is acceptable syntax, so is the 
latter. That is, we have just 
been forced to regard 


(2) (DP = (TP + 1; 


as a perfectly acceptable C ex- 
pression. This requires us, of 
course, to agree that the first 
occurrence of (T)P in this ex- 
pression is an lvalue. 

Now come the interesting 
questions: if (1) is correct, then 
on what grounds can we possi- 
ble forbid 


(2) (NP =1+4+ 1; 


or, in general, 


If lightning still scares you, 
you're using the wrong file manager. 


Be sure. Btrieve.© 


Lightning may strike. But it doesn’t 
have to destroy your database. 

Btrieve® file management offers 
automatic file recovery after a system 
crash. So accidents and power failures 
don’t turn into database disasters. 
Your Btrieve-based applications will 
come up when the lights come back on. 

Fast. Btrieve is lightning fast, too. 
It’s written in Assembly language es- 
pecially for the IBM PC. And based 
on the b-tree file indexing system, 
with automatic balancing and elec- 
trifying access speed. 

The standard for networking. 
Btrieve/N (network version) sets the 
standard for the industry’s most 
popular LANs and multi-user 
systems. 

Fully-relational data management. 
SoftCraft’s entire family of products 





gives you a complete, fully-relational 
database management system. 
Rtrieve™ adds report writing capabili- 
ties. Xtrieve™ speeds users through 
database queries with interactive 
menus. 

For professional programmers. 
Btrieve is the fast, reliable answer for 
all your application development. In 
any development language—BASIC, 
Pascal, COBOL, C, FORTRAN and 
APL. With Btrieve, you can develop 
better applications faster. And know 
they'll be safe if lightning strikes. 





SC SoftCraft Inc. 


P.O. Box 9802 #917 Austin, Texas 78766 
(512) 346-8380 Telex 358 200 


Suggested retail prices: Btrieve, $245; Btrieve/N, $595; Xtrieve, $195; Xtrieve/N, $395; Rtrieve, $85; 
Rtrieve/N, $175. Requires PC-DOS or MS-DOS 1.X, 2.X, or 3.X. NO ROYALTIES. 
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(3) (T)P = x: 


Our only hope is to argue that 
in (2) and (3) there is no “pur- 
pose”’ for an additive operation 
on P. So we have to be willing 
to say that (1) involves an addi- 
tive operation on P while (2) 
does not. 

But this does not really make 
things any clearer. How, for ex- 
ample, do we tell in general 
whether an expression is being 
used “for the purposes of addi- 
tive operations on P?”’ The con- 
text of (1) is particularly simple. 
Shall we impose the arbitrary 
condition that, in order for (T )P 
to be considered an lvalue in 
the expression 


(4) (NP=E 


that it occur as a subexpression 
in E? What is the possible justi- 
fication for this ad hoc excep- 
tion to an otherwise elegant 
and uniform grammar? Cer- 
tainly it is counterintuitive and 
terribly confusing to a user of 
the language to insist that the 
left occurrence of (T)P in (1) is 
an lvalue but its left occur- 
rences in (2) and (3) are not. Is 
what we gain worth the impo- 
sition of such an arbitrary ex- 
ception to our grammar and 
the resulting confusion? 

Note, incidentally, that the 
simple approach just suggested 
will not work, for the mere oc- 
currence of (T)P within E does 
not ensure that it is used “for 
the purposes of additive opera- 
tions on P.”’ It may occur in E in 
such a way that its value is nev- 
er used or is never used in as- 
signing the new value of (T)P. 

There is another reason that 
the simple approach of requir- 
ing (T)P to occur within E will 
not work. Suppose that P is a 
global variable and we have de- 
fined a function f such that: 


(T) fO) 
{ 


} 


return((T)P + 1); 


Now consider the expression 


Certainly we are using (5) “for 
the purposes of” an additive 
operation on P. Can a compiler 
be expected to detect this pur- 
pose? Even if the definition of 
f() and (5) occur in different 
source files? To answer yes to 
these questions is to demand se- 
rious revision in the way we 
conceive of C. 


The Semantic Problem 

Now exactly what is the prob- 
lem in all of these cases? It is 
that an attempt has been made 
to make a single exception to an 
otherwise general and formally 
correct rule: that a cast expres- 
sion (such as (T)P) is never an 
lvalue. There are very good and 
well-known reasons for this 
rule, and they follow directly 
from the semantics for C. 

The motivation for this at- 
tempt appears only to be a de- 
sire to ensure that certain dubi- 
ous (at best) coding practices 
[Humph!—AH] will be tolerat- 
ed by any compiler conform- 
ing to the proposed standard. It 
may be argued, for example, 
that if the exception is not 
made, then a certain amount of 
existing code will fail to com- 
pile under a standardized com- 
piler. This may be true, but in 
light of the consequences of 
embracing the exception, it can 
hardly be looked upon as a 
compelling argument. 

The totally misguided nature 
of this attempt at construing 
(T)P as an lvalue in a context- 
dependent way can be seen in 
the examples described above. 
The most immediate problem is 
the appeal to “purposes” in a 
description of the exception. 
Expressions of a programming 
language do not possess intrin- 
sic ‘‘purposes’”’ (though those 
who write them may have a 
purpose in doing so, of course). 
An appeal to “purposes” has no 
place in the definition of a pro- 
gramming language or in the 
document purportedly describ- 
ing its standard. As it now 


stands, the proposed attitude to- 
ward considering (T)P an 1- 
value is very close to saying that 
“(TP will be considered an lva- 
lue when the programmer 
wishes it to be (ie., when it is his 
or her purpose to use it as an 
Ivalue), and otherwise it will 
not be an lvalue.’’ Given the use 
of “purposes,” there can be no 
pretense at creating a formally 
precise standard for the lan- 
guage that will enable compiler 
writers to implement the stan- 
dard in an objective manner. 


The Machine Problem 

Another difficulty with consid- 
ering (T)P an lvalue (for any 
purpose) is that some machine 
architectures require different 
representations for pointers to 
different classes of objects. 
Clearly, if (T)P forces a conver- 
sion of P to a different repre- 
sentation, there is no justifica- 
tion whatever for regarding 
the result as an lvalue. On 
word-addressed machines, the 
example shown in 4.2.4 cannot 
be implemented because char- 
acter pointers are simply not 
congruent with pointers to 
long integers. [A better exam- 
ple is the 8086 where, in the 
medium model, a pointer to 
data can be 32 bits when a 
pointer to a subroutine is 16 
bits.—AH] Is it the intention of 
the proposed standard to pre- 
vent the implementation of its 
definition of C on such ma- 
chines? The usefulness of C is 
such that we should make ev- 
ery attempt to allow its imple- 
mentation on as many Ma- 
chines as possible; indeed, one 
of the principal purposes of a 
high-level language is to insu- 
late programmers from the id- 
iosyncrasies of the underlying 
hardware. While no attempt to 
embrace the entire spectrum 
of existing architectures is like- 
ly to be successful, surely C 
should not be limited to those 
machines that use a single 
pointer representation for all 
objects? It is true that word-ad- 
dressed machines present seri- 
ous problems for the large 
body of existing code that as- 
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sumes a single pointer type. 
The standard, however, should 
be sufficiently general that it is 
independent of any assump- 
tions of this kind. 


Possible Solutions 
What is needed? 


1. Replace the clause ‘‘for 
purposes of additive operations 
on P” with a formally precise 
description of cases in which 
(T)P is an lvalue. We do not be- 
lieve this can be done without 
doing violence to a large por- 
tion of the sematics of C. The 
price is simply too high. 

2. Treat (T)L (where L is an 
Ivalue) as always being an lva- 
lue. The arguments are well 
known and appear to be 
compelling. 

3. Give up the equivalences 
between (++E) and (E+=1) 
and between (E+ =1) and 
(E=E+1) that allowed us to 
generate the problematic ex- 
amples above. But we cannot 
simply “give up” these equiva- 
lences since they are a conse- 
quence of the semantics for 
++; +=, +, and =. To give 
them up would not only be 
counterintuitive but also would 
require a gross revision of the 
semantics of the operators of C. 
This route is impossible. 

4. Conform to the currently 
accepted principle that (T)L is 
never an lvalue. This now ap- 
pears to be the only reasonable 
course, and our strong recom- 
mendation. The price we pay 
for it is that some previously 
existing code that has been ac- 
cepted by some compilers will 
no longer be accepted by a 
standardized compiler. But it is 
hopeless and pointless for a 
standard to seek to preserve 
the acceptability of all previ- 
ously existing code. The price 
we must pay for embracing 
this alternative is insignificant 
in comparison to what we 
would have to pay for any of 
the others. 


June 8, 1984 
Gary H. Merrill and 
Francis L. Lynch 
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This is done using the program in List- 
ing Two, page 74, in conjunction with 
the shell script in Listing Three, page 
74. Listing Three shows additions you 
should make to your .cshrc file. 


Putting the Shell Level into 
the Unix Prompt. 

The MS DOs shell presented in the Jan- 
uary-March C Chests makes the cur- 
rent shell level available in an envi- 
ronment variable. Unix doesn’t. 
Nonetheless, in Unix it’s possible to 
create an almost infinite number of 
nested shells, and it's occasionally 
useful to know the current level of 
shell nesting. The current shell level 
can be printed by the Unix C Shell. 


DDJ 


(Listings begin on page 72.) 
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TO COMMUNICATE ? 
C programs can communicate with the world now through the power of 
The Greenleaf Comm Library. Now from the people who brought you The 


Greenleaf Functions General Library for C, comes this rich interrupt driven, 
ring-buffered asynchronous communications capability. 







Over 100 furictions in C and assembler to facilitate communications at up to 
9600 baud. Up to eight ports at a time. ASCII or XKMODEM. X-On/X-Off too. 
Hayes compatible modems controlled here. Safe too, bet you can’t exit your 
application with interrupts hot. Major applications around the world base 
their communicating applications on The Greenleaf Comm Library. Stop just 
trying and start really communicating. Get your copy of The Greenleaf Comm 
Library today. For all major C compilers, all models, all versions. For the 
IBM PC and just about any machine with MSDOS and an 8086. Comes with 
source code, extensive examples, demo programs, featuring C-Terminal, 
reference card and newsletter. No royalty. $185 













Other Products: The Greenleaf Functions General Library, over 220 
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ARTICLES 


Human 





Interface 
Design: 
From the Outside In 


by Jim Edlin 


got into the user- 

I interface design | 

‘business by acci- 
dent. Early in 1980, 
while searching for a 
word processing pro- 
gram for my own use, 
I came across one that 
stood well out from 
the herd. Naturally, I arranged to get a copy. I wanted it 
for drafting a sizable manuscript I had just contracted to 
do. What I didn’t understand in making my impulsive 
commitment to this program was that it was still under 
development. I became an unwitting beta tester. 

I also soon discovered that this thing that looked so 
beautiful and seductive on first meeting revealed some 
disagreeable imperfections at a closer view. The develop- 
ers offered to correct some of the design flaws. Soon I 
became their impromptu adviser on design improve- 
ments—for example, in the case of a tab-stop setting se- 
quence that came up with a ‘Column Number? 
prompt, I told them: “‘When someone wants to set a tab 
stop, he may have no idea of what column number he 
wants it in. What he knows is that he wants the tab stop 
here,” and I pointed. The tab-stop interface was changed 
to one where the user pointed via cursor to the desired 
column for the tab stop. 

Since then, my involvement in user-interface design 
has become more formal. For one thing, I started a soft- 
ware company—Bruce & James Inc. My big design effort 
so far has been B&J’s flagship product, the Wordvision 
word processor (actually a descendant of that program I 
volunteered suggestions for earlier). The design work for 





The Softer Interface Inc., 2355 Leavenworth, Ste. 103 
San Francisco, CA 94133 
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DEMO gives you a chance to 
noodle through a dozen different 


approaches before the 
programming meter starts ticking. 





Wordvision extended 
throughout the pro- 
gram’s 15-month de- 
velopment cycle and 
has recently resumed 

in preparation for a 
| new edition. 

I have also wrestled 
with interface designs 
for several other Bruce & James products, released and 
unreleased, and have evaluated interfaces for many 
other companies’ products in the course of considering 
them for publication, writing about them, or informally 
advising their developers. 

Most recently I have organized a company with the 
explicit mission of assisting others with user-interface de- 
sign. During all my work with user interfaces, I have 
been seeking tools and techniques to help with the job. 
I’ve wanted to find things that would enhance my cre- 
ativity and productivity, just as a word processor has aid- 
ed my writing. I have tried out numerous possibilities. 
Until recently, I have found them all wanting. 


Pretenders 

My first tool was the BASIC language. I wrote BASIC pro- 
grams to make prototype screen designs and to change 
the display in response to keystrokes. This was laborious, 
particularly when the screen used display features be- 
yond simple printing of text and when it needed a lot of 
color and attribute painting. BASIC (particularly earlier 
versions) just isn’t built for such jobs. 

The next approach was inspired when I showed one of 
my BASIC prototypes to Peter Jennings, a founder of the 
former software giant VisiCorp. He suggested I use ‘‘sto- 
ryboards.’’ The idea seemed an obvious fit because I had 
worked in TV advertising, where the storyboard—a se- 
ries of drawings sketching out the sequence of key im- 
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ages in a commercial—is one of the fundamental tools of 
the trade. 

Eventually, I used the storyboard approach to develop 
many of the preliminary designs for Wordvision. At first, 
however, I found storyboards unsatisfactory for the 
same reason that, after adapting to word processing, I 
now find writing on paper unpleasant. Furthermore, ad- 
vertising storyboards portray generalities of visual con- 
cepts; in software I wanted to work down to the level of 
fine detail. Ink on paper was not malleable enough. It 
also didn’t have a useful dimension for portraying and 
experimenting with flow of control—that part of the in- 
terface dealing with how the parts relate and how users 
move among them. 

The flow-of-control question forced me to my next ap- 
proach—a repeatedly reinvented series of forms on pa- 
per. These contained spaces for writing in a description 
of the screen display; an explanation of what events 
could cause the display of that screen; a list of user op- 
tions while on that screen; a description of other screens 
or actions to which these choices would lead; and a space 
to describe audio, animation, and other happenings, such 
as use of peripheral devices. 

The form kept getting revised because I continued to 
run up against situations that demanded entry of infor- 
mation for which there were no spaces on the current 
version of the form. Nevertheless, the forms acted as a 
sort of linked list and furnished fairly definitive instruc- 
tions for programming. But they failed to give an overall 
sense of how the program would actually operate and 
“feel.” 

Eventually the forms gave way to a system of diagrams 
and notation formalized by a coworker. We maintained 
these in pencil to allow for the inevitable frequent revi- 
sions. The resulting binder became the essence of a user- 
interface specification. It did the recording job; but as a 
designer's tool, it was as cumbersome as the intricate no- 
tation used to record dance compositions. It’s difficult for 
me to imagine a choreographer finding it more produc- 
tive and rewarding to scribble pages of intricate nota- 
tions than to observe action on a stage as he instructs 
dancers to try different moves and sequences. Likewise 
with interface design. 

In 1984, I finally found a software tool for designing 
interfaces—Window Panes by Jim Canright ($160 from 
Softright, P.O. Box 132, Beaverton, OR 97075; (503) 641- 
4072). Window Panes added a lot of leverage to my design 
toolbox. It consists of two subprograms: a display editor 
to create screen designs as either full or partial windows, 
and a ‘‘walker’”’ to create and edit sequences for the win- 
dows created with the editor. The sequences can be 
based on keystrokes, on elapsed timings, and so forth. 
With Window Panes, it is possible to develop prototypes 
of both screen designs and flow of control in reasonable 
detail. 

Window Panes had its drawbacks, though. First, be- 
cause it was difficult to use, I never did quite master its 
intricacies. Second, every screen or window overlay dis- 
play called for a separate disk access. Although it operat- 
ed speedily with a RAMdisk, the business of getting it set 
up with access to the right files every time was an annoy- 
ance. I don’t want to downgrade the value of Window 
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Panes; I considered it a true boon when it arrived, but in 
actual use I found it frustrating. 

The version of Window Panes I used is two years old. 
There is a new version out that probably has improve- 
ments, and Canright tells me a still-newer version should 
be out by the time this article is published. 

After Window Panes, the next tool I adopted was Say- 
what ($39.95 from The Research Group, 88 S. Linden Ave., 
South San Francisco, CA 94080; (415) 571-5019). Saywhat is 
a screen generator originally designed for building dis- 
plays for dBASE II applications. Later The Research 
Group expanded it to offer the same abilities for Turbo 
Pascal and BASIC programs and for stand-alone screens 
that could be displayed from the DOS prompt with a sup- 
plied utility program. 

For designing single text-mode screens, Saywhat is im- 
pressive. You can learn it easily and appreciate its ease of 
use. The drawback to Saywhat is in prototyping for flow 
of control. The only options are to create a program in 
one of the languages Saywhat works with or to create a 
DOS batch file that calls up one screen after another in 
sequence, with little opportunity to explore branching 
paths or go backward. And every screen is a file, no mat- 
ter what program you use it with. Once again, operation 
is fast only if you use a RAMdisk, and even then it clutters 
your disk with files. 


Dan Bricklin’s DEMO Program 

Now I have set my previous tools aside in favor of Dan 
Bricklin’s DEMO Program, the new prototyping software 
by the well-known co-creator of VisiCalc. DEMO ($74.95 
from Software Garden Inc., P.O. Box 238, West Newton, 
MA 02165; (617) 332-2240) is the outgrowth of a tool Brick- 
lin developed originally for his own use. It goes a long 
way toward the tool I have been seeking—especially at 
the inexpensive price, which I applaud. Had DEMO been 
available when we began work on Wordvision, I bet we 
would have shipped it at least three (financially very sig- 
nificant) months sooner. 

I am a believer in the “artistic,” as opposed to ‘‘engi- 
neering,’ model of program design. I think good pro- 
grams evolve as their structure fills and you have a 
chance to see what works and what doesn’t. But some 
programmers I know prefer to work under the engineer- 
ing model. (“You don’t want to redesign the bridge after it 
is halfway built.”’) In particular, it seems to me program- 
mers don't like coding interface changes. One I often 
work with refers to this as ‘‘shoelace tying’’ 
programming. 

DEMO gives an interface designer the chance to noodle 
through a dozen different approaches before the pro- 
gramming meter starts ticking and before any expensive 
data or control structures get built that would be expen- 
sive to revise. Incidentally DEMO in no way imposes a 
user-interface viewpoint of its own, except for the im- 
plicit one of the choices Bricklin himself has made. To 
illustrate this, the sample files included with DEMO show 
how to implement the interface for a sample task in 
three significantly different ways. 


A Hot Program 
Trip Hawkins, founder of Electronic Arts, has enunciated 
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a trinity of desirable qualities for a program: hot, simple, 
and deep. By this standard I rate DEMO in the high per- 
centiles for both hot and deep and a bit lower but still 
good on simple. 

Hawkins’ hot criterion can be interpreted in a couple 
of ways. You can take it to mean raw performance—jet- 
propelled accomplishment of a task at hand. DEMO cer- 
tainly fits that bill; for one thing, it can jump through a 
series of full-screen displays as fast as you can press the 
keys to call them up. Hot can also mean topical—filling a 
need. Some work is not worth doing at all until the prop- 
er tools exist to bring the job down to reasonable propor- 
tions—many of the ‘‘what if’’ evaluations now done with 
spreadsheets probably fall into this category. “What if” 
experimentation with user-interface approaches, and 
fine tuning of them, may also have fallen in this catego- 
ry—until DEMO. 

Now let’s talk deep. Frankly, I am astonished at the 
depth of detail and refinement Bricklin has worked into 
his first release of DEMO. On occasion after occasion, as 
the words “Wouldn't it be nice if. . .” started to take form 
in my mind, DEMO provided just what I was looking for. 
(I suppose it helps to have beta testers of the ilk of Lotus’ 
Mitch Kapor.) 

Suppose, for example, you want to print faithful im- 
ages of screen designs that make generous use of line 
drawing and symbols from IBM’s extended character set. 
And suppose your printer doesn’t have a character set to 
match. DEMO gives you a mapping feature to translate 
screen characters to other printer characters of your 
choice. You can even map individual screen characters to 
character sequences on the printer, using a backspace to 
overprint two standard characters and make up a com- 
posite that approximates to one of the special IBM set 
(such as a caret and vertical bar to make an up arrow). 

A variation of the same feature lets you translate your 
screen designs into a useful form for inclusion in pro- 
gram code. You can direct your mapped output to a text 
file instead of the printer and specify a C language or 
Pascal language mapping, which turns characters out- 
side the normal printable set into syntactically correct 
octal or hexadecimal representations. (A hex format for 
assembly language is curiously absent.) 

The fundamentally right thing about DEMO is that it 
combines rich sets of tools for protyping both screen de- 
signs and flow-of-control structures and integrates them 
into a conceptually consistent frame of reference in 
which it is easy to move around. There is no perceptible 
border to cross in going between these two areas. — 


User Caring 
Beyond this, DEMO possesses a caring attitude toward the 
user that shows throughout the program in such touches 
as allowing you to rearrange the order of most program 
lists (macros, save areas, and slides). When you are draw- 
ing lines, DEMO knows what characters to put in to make 
a proper junction when you draw one line to join or cross 
another. 

There is also a familiar element from VisiCalc that con- 
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tributes mightily to this program—one you might call 
“point and shoot.” In the same way as you might build a 
spreadsheet formula by pointing to various cells, in effect 
saying ‘multiply this times (... scroll, scroll, scroll, point 
...) that,” you can build a screen sequence in DEMO by ; 
flipping through the screens until you see the one you 
want and pressing a key to say ‘‘that one.” 

Two other things Bricklin does right are to make it easy 
to get maximum mileage out of your work by reusing it 
as often as is applicable and to conserve your resources 
with this program's analog to the “sparse matrix’ ap- 
proach for spreadsheet data storage (where no memory 
is used by cell addresses that have no real contents). The 
power to reuse work grows out of the Overlay features, 
which allow you to design only one or a few basic 
screens, then modify them with overlays that can have 
areas with both ‘‘opaque” and “transparent” areas. (In 
the former, the underlying display is blocked out; in the 
latter it shows through.) 3 

My company’s programs typically use a menu-tree 
structure in which soft function key legends across the 
bottom of the screen change as the user travels through a 
set of menu options. For a sequence such as this, I can 
paint in the basic screen and then create half a dozen 
overlays that pop into place in the function key display 
area when activated by my specified keypresses. 

I don’t want to give the impression that there is nothing 
wrong with DEMO. Refinements and extensions could 
keep Bricklin busy for a long time. Perhaps the major 
limitation at the moment is that DEMO is restricted to text 
mode. For people working primarily or exclusively with- 
in text mode, this is not really a limitation at all. As pow- 
erful graphics displays grow more common, however, 
and to the extent that windowing environments play an 
increasing role, it will become more important for this or 
a similar tool to address the graphics universe. (I sure 
would love to see DEMO ported to the Mac and Atari ST!) 

I think DEMO is weaker than it could be in the area of 
screen painting, particularly attributes but also ease of 
putting in line and symbol characters. Macros (both built- 
in and from a RAM-resident key macro product) can help 
this, but the basic weakness remains. 

Although DEMO is fairly ““modeless” (that is, key com- 
binations usually do what you expect regardless of what 
phase of the program you are in), there is still cleanup to 
be done. An example is after pressing Esc-B to bring up 
the Block menu, you can’t move the cursor before press- 
ing B again to begin the block. 

Also, the Handler capabilities (which let you specify 
which keystrokes or events produce which displays or 
actions) aren't comprehensive yet—for example, many 
programs use soft function key displays that change 
when you press the Shift (or Ctrl or Alt) key. So far, DEMO 
can’t do handlers responding to these and other signifi- 
cant key actions. It also can’t do much in the sound area 
beside beep and do simple note sequences. 


Low-Rent Documentation 

DEMO’s documentation and packaging is self-consciously 
plain and low- rent. The manual is 30 pages of 8'%2 X 11- 
inch, corner-stapled and instant-printed output from 
Bricklin’s NLQ dot-matrix printer. Its contents are orga- 
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nized to mirror the menus and submenus of the pro- 
gram’s command structure. 

This documentation approach is one that is often used, 
particularly in lower-priced programs. It is essentially an 
extension of the Kapor/Lotus-style on-screen interface 
that displays a set of command words in a menu and 
offers the ability to scroll through sentence-length expla- 
nations for the significance of each command word. The 
paper documentation in this scheme takes the same idea 
one level further; each command gets from one to sever- 
al paragraphs of elaboration, noting all the dos, don'ts, 
and special cases. This approach works for getting the 
detail into a place where it is accessible for reference, but 
I have always found it lacking in the ability to explain 
how to use the program to achieve a user’s goals. Bricklin 
is blunt about saying his program is designed, aimed, and 
packaged for those with the knowledge and motivation 
to make proper use of it. At least the documentation is 
clearly and simply written and seems not to miss much 
necessary detail. 

Incongrously, whereas DEMO’s packaging and _posi- 
tioning is aimed squarely at programmers, Bricklin 
seems to harbor ambitions of also selling it in the slide- 
show and training-system market. DEMO’s capabilities 
certainly make it appropriate there, but users who want 
to use it for such purposes will have to overcome docu- 
mentation not aimed at them. To accommodate custom- 
ers in this market, Bricklin is considering some new pric- 
ing options. One possibility is an unlimited license to 
include RUNDEMO with a single slide show for a flat fee 
of $1,000. 


A Little Taste of DEMO 

To give some flavor of what DEMO can do and how it 
works, I used it for a small project and noted my steps as I 
went. Rather than building something from scratch, I ex- 
perimented with possible refinements to an existing pro- 
gram. For fun, I picked Zoomracks, a program designed 
by Paul Heckel, author of The Elements of Friendly Soft- 
ware Design (New York: Warner Books, 1984) and some- 
thing of a guru on the subject of user interfaces. 

Zoomracks (described in DDJ, November 1985) uses a 
card-rack metaphor. A main feature of the program is its 
ability, when you depress one key, to switch its view 
(zoom) between compressed views of several informa- 
tion racks and a full view of a selected rack. Within a 
given rack, a similar feature lets you zoom between a 
summary top-line view of all cards in the rack and a full 
view of a selected card. I like these concepts but suspect- 
ed the screen visuals Heckel uses to present them might 
benefit from some refinement. I used DEMO to test my 
theory. 

First I loaded the Capture utility provided on the DEMO 
disk. This remains resident in memory and lets you im- 
port screens from other programs into DEMO. When 
Capture returned me to the DOS prompt, I loaded Zoom- 
racks, manipulated it to show the first example screen I 
wanted to tinker with, and pressed both Shift keys at 
once. Capture beeped to acknowledge it had taken a 
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snapshot of the screen. I then ran Zoomracks through the 
other three screens I wanted to work with (one view 
each way of both the card zoom and rack zoom), captur- 
ing each in the same way. 

Exiting from Zoomracks to DOS, I then started DEMO 
itself. From DEMO’s opening screen, I pressed Esc for the 
main command menu, I for the I/O menu, and R for Re- 
trieve. Immediately, the first of my four screens—the 
multicard, multirack display—popped into view. In DE- 
MO'’s terminology, this screen was my first slide. 

The sequence Esc-R-H led me through the Run menu to 
the Handlers menu for my first slide. Handlers specify 
what DEMO should do from a given slide upon the occur- 
rence of various events. Pressing the I key told DEMO to 
insert a new handler for that slide. Anew menu display- 
ing possible events popped on-screen; from it I chose 
pressing the F1 key as the event that would define a 
handler. 

A menu of possible actions popped up. The V key told 
DEMO that I wanted to view another slide if F1 was 
pressed while the current slide was showing. DEMO, 
guessing I might want the next slide in the series, showed 
it to me with a small menu overlaid on one corner. My 
options were to press Return if that was the slide I want- 
ed brought up, or to use F1, F2, or other search options to 
bring my choice into view. Because I wanted the third 
slide in my sequence—the multicard, single-rack view—I 
used F2 to bring it up and Return to select it. 

Back on my starting slide, I pressed Esc-R-R (the Run 
option from the Run menu) to try out my new handler. 
The first slide showed, I pressed F1, and, zap—there was 
my zoomed-out view. 

Ctrl-Break put me back in Edit mode, and I ran through 
the handler sequence again to say that, if F1 were pressed 
while viewing this slide, the earlier slide should be 
shown. I then went into the Run mode again to try it out. 
Success! Pressing F1 now bounced me back and forth be- 
tween the zoomed-in and zoomed-out views, just like in 
the real Zoomracks program. After three minutes of 
work, I had a simulation duplicating a main feature of 
Zoomracks. It took me another couple of minutes set up 
the handlers to simulate the card zoom features of Zoom- 
racks’ F2 key. 

Then I went back to the original slide to try my hand at 
visual redesign. I thought I would change Heckel’s menu 
line at the bottom into a pull-down menu from the top 
instead. Moving the cursor to the menu line, I pressed 
Esc-B-B for the Begin choice from the Block menu. A one- 
character-size box appeared, and I used cursor keys to 
expand it around the whole menu line, then pressed Re- 
turn to complete the selection and pressed S for save. I 
used this Named Save Area feature rather than just cut- 
ting and holding the menu in the normal cut/paste buff- 
er because I would need to do another block operation to 
make space where I wanted the menu to go. A short se- 
ries of keystrokes let me create a new save area, name it 
Menu, and put the menu line into it. 

Using the Block feature again, I selected the top three- 
quarters of the screen and used the Move option to push 
it down a few lines, making room for the menu at the 
top. Then I pasted the menu into the new space. Next, a 
flurry of editing and attribute painting restyled the menu 
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Language Features 


@ Data Types: char, short, 
int, unsigned, long, float, 
double 


Data Classes: auto, 
extern, Static, register 


Typedef, Struct, Union, 
Bit Fields, Enumerations 


Structure Assignment, 
Passing/Returning 
Structures 


The Best C Book 


== A Powerful C Compiler 
One Great C Value *39.95 


A good C book just isn’t complete without a good C 
compiler to go with it. That’s why we give you both. You get 
a comprehensive 450 page book and a full feature standard 
K&R C compiler with the Unix V7 Extensions. The Book is 
loaded with examples that teach you how to program in C. 
And our fast one pass C compiler comes with an equally fast 


linker so you don’t waste a lot of time watching your disk 
drives spin. You also get a Unix compatible function library 
that contains more than 150 functions (C source code 
included ). And if all that isn’t enough, we offer you a 30 day 
money back guarantee. So what are you waiting for? The 
exciting world of C is just one free phone call away. 


Functions 





MIX Editor 
$29.95 


When you’re programming in a high 
level language you need a high power- 
ed editor. That’s why we created a 
programmable full/split screen text 
processor. It lets you split the screen 
horizontally or vertically and edit two 
files at once. You can move text back 
and forth between two windows. You 
can also create your own macro com- 


100 predefined commands. The editor 
comes configured so that it works just 
like Wordstar but you can change it if 
you prefer a different keyboard layout. 
The editor is a great companion to our 
C compiler. Because they work so 
well together we want you to have 
both. To make sure you do, we're 
offering the editor for just $15 when 





strcat 
strcmp 


strcpy 
strlen 
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to my taste. For the last step on the menu, I wanted to use 
a graphics character for visual separation between each 
selection. Pressing Esc-T-C (for Typing, Characters) 
brought up a menu displaying special characters, and a 
few more keystrokes selected my choice. 

I needed to use the graphics character several times for 
the menu and found the keystroke sequence for getting 
one character to be excessive. The second time, before 
starting, I pressed Shift-F6 to turn on the Macro Learn 
mode. Responding to a prompt, I assigned the sequence 
to the Alt-1 key, then typed the usual sequence to get my 
graphics character. Ctrl-Break ended the macro defini- 
tion. Thereafter, I could get my graphics character just by 
pressing Alt-1. 

The final experiment I wanted to try was to give more 
visual impact to the zoom process. I wanted to keep some 
reminder of the unzoomed racks even when a selected 
rack was zoomed out to occupy the whole width of the 
screen. Using Block functions and editing, I did some sur- 
gery on the lines at the top of the multirack screen that 
showed the rack structure. Then I copied these lines into 
the paste buffer, switched the view to the single-rack 
screen, and pasted the new lines in place. A little more 
tinkering and I had the visual effect I wanted. 

I gave some thought to prototyping a little animation 
instead of just flipping instantly from the multirack 
screen to the single-rack screen. It would have been easy, 
starting with the two slides I had and using DEMO's over- 
lay and handler features. But I suspected the 15. minutes 
of work I had already done, if actually implemented for 
Zoomracks, would cost hours or days of coding to accom- 
plish; so I decided to let well enough alone. 

With an Esc, an I, and an S, my work so far was saved to 
a disk file. Included in the file were my macro for typing 
the graphics character and the named save area for the 
menu line. 

If I so desired, I could then have made up a disk for 
Heckel with that file and with one of my 50 alloted copies 
of the RUNDEMO program that comes with DEMO. Al- 
though Heckel could not modify any of my prototype 
work without having his own copy of DEMO, RUNDEMO 
would allow him to view my suggestions on his comput- 
er and to run as often as he liked through all the se- 
quences I had defined for the F1 and F2 keys. 
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ARTICLES 


Human 





Interface 


Design: 


Jef Raskin Interview 


ef Raskin’s involvement with 
oY cen computer user-inter- 

face design is hardly recent. In 
early issues of DDJ, he inveighed 
against needlessly complex systems. 
At Apple Computer, he wrote many of 
the company’s product manuals. Later 
he was a member of the original Mac- 
intosh design team. Today he is the 
founder of Information Appliance of 
Menlo Park, California, which cur- 
rently offers a product called Swyft- 
Card for the Apple Ile and IIc. DDI will 
review SwyftCard next month. 

Raskin cares tremendously about 
user-interface design, on computers 
and elsewhere. During our discussion 
he said, “As a person Im easily frus- 
trated. Im very annoyed at the little 
things that most people put up with.” 
He got up and walked out of the door, 
shutting it behind him, and immedi- 
ately opened it and reentered the 
room. “What a nuisance! If I had two 
bags of groceries and a locked door! 
The door is a very, very bad design! 
Someone will have to improve it. But 
were so accustomed to it that we 
dont think about it.”’ 

If Raskin doesn’t like doors in build- 
ings, does that mean windows on com- 
puters are also unacceptable? In the 
following interview with DDJ, he dis- 
cusses a wide range of issues concern- 
ing user-interface design. 


DDJ: For how long have you been 
thinking along human-interface de- 
sign lines? 

Raskin: When I was a computer cen- 
ter director at UC San Diego, there 
was a major computer center with a 
huge machine. I built another center. 
It didn't have fluorescent lights. It 
used minicomputers—the very early 
Data General Nova—and it was time 
sharing. Instead of submitting things 


32 


When I gotoa 
conference and tell 
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on punch cards in the big computer 
center, you could come over to this 
little computer center I had built, 
and there were 32 terminals, bean- 
bag chairs, and incandescent lighting 
with Japanese globes. You had indi- 
vidual terminals to work on. Stu- 
dents loved it. Even people from the 
big center would come over to use it. 
We also had a language called 
FLOW, which had only six or seven 
commands and was very good for 
teaching programming. So working 
on better language design and the 
whole ergonomic question dates 
back to the 60s, when everyone else 
was looking at anything but that. 


DDJ: Can you identify some of the 
important criteria in the design of 
user interfaces? 

Raskin: In any user interface there’s 
an almost unquantifiable factor of 
feel. And this is something I find so 
hard to explain. You can only 
achieve it by massive testing on hu- 
man beings. 


DDJ: Like with SwyftCard? 

Raskin: SwyftCard is a little product 
for the Apple II, and we tested it on 
1,500 people. There were focus 
group tests, one-on-one tests. There 


by DDJEditors 
were small-group tests. There were 


tests in schools. We learned a lot. We 
made a lot of changes and did a lot of 
fine-tuning. 


DDJ: But you started with something 
close to the product's current user in- 
terface. You had a preconception of 
what would work, didn’t you? 
Raskin: I’ve been concentrating on 
the question of how to make systems 
feel good for 18 years now. Some- 
times that kind of concentration pro- 
duces ingrown, moribund ideas, and 
sometimes it produces results. I think 
in this case it has produced results. 


DDJ: Besides feel? 

Raskin: There’s habit, and here 
we re on better theoretical ground. A 
system should allow a person to 
form habits. There are two funda- 
mental principles that help people 
form habits. One of them is well 
known in this industry, and that is 
making things modeless. It’s just a 
fact of life that people can’t keep 
track of modes. You make mode er- 
rors when you think you're doing 
one thing and you press a key, but 
because you're in the operating sys- 
tem and not the editor, the system 
does something else. I remember in 
the old UCSD Pascal system,-I would 
sometimes press E for exiting, and in 
some other place, it meant execute— 
it would try to execute a letter to my 
mother or something. You can imag- 
ine the kinds of Pascal syntax errors 
you get from a letter to your mother! 


DDJ: No modes. That sounds like an 
underlying rule. 

Raskin: If a system is modeless, then 
you develop habits. If you want to do 
something, you just reach and do it 
that way—you don’t get frustrated. 
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Modelessness has never been de- 
fined satisfactorily. It means that a 
given action has one and only one re- 
sult. When you put the definition in 
that form, you can easily form a con- 
verse: To get a particular result, you 
want one and only one action. If 
that’s the case then you don’t have 
these branches. If you read Stewart 
Card’s book The Psychology of Hu- 
man Computer Interaction (Hillsdale, 
N.J.: Lawrence Erlbaum Associates), 
one of the better books in the field, 
you find a lot of the time you take 
isn't the doing time but the thinking 
time—working out a path. How am I 
going to get there from here? If you 
have only one way to do something, 
then you don't have to think about 
that. You can form habits even faster. 
If it’s modeless your habits won't trip 
you up. In the industry we call this 
other property monotony, for lack of 
any other name. It means for a par- 
ticular action, we try to have one and 
only one way to do it. If a system is 
modeless and monotonous, then you 
can form habits because whenever 
you want to do something you al- 
ways do the same thing. It’s like tying 
your shoe. Imagine if every Thurs- 
day your shoes exploded if you tied 
them in the usual way. This happens 
to us all the time with computers, 
and nobody thinks of complaining. 


DDJ: So you have no modes, plain 
and simple? 

Raskin: We actually did deliberately 
introduce one mode. We're not so 
doctrinaire that we won't do some- 
thing when it does make sense. But 
our system is largely monotonous. 
There's generally only one way to do 
things. I remember reading a de- 
scription of a system where the de- 
velopers said, whenever they had a 
disagreement about how something 
should be done, they did it both 
ways. That’s not a design decision. 


DDJ: As in whether to use a mouse or 
command keys? 

Raskin: Usually if you can't decide 
which way is better, it means you 
haven't found a good way to doit. On 
the Macintosh there’s almost always 
a way of getting around the mouse 
by using the keyboard. This should 
have given the designers, after I left, 
the hint that maybe the mouse was 
not the right way to do it. If youre 
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always looking for a way around it, 
you ve obviously got some kind of 
problem. 


DDJ: Documentation has always 
been a specialty of yours. Does it en- 
ter into your definition of the user 
interface? 

Raskin: Our user manual has some- 
thing interesting in it; aside from 
having schematics and the usual the- 
ory of operation, here’s something 
I've never seen in any other manual 
that I’ve ever looked at—the user-in- 
terface theory of operation, or how 


we designed the user interface. 


DDJ: You believe the user must un- 
derstand the theory? 

Raskin: No, I don’t feel the user 
needs to know. I know, as a reader of 
manuals, I often wonder: Why do 
they do this? How did this come 
about? You can use the system with- 
out reading any of the theories of op- 
eration. You can learn the system by 
reading about 40 pages. Some people 
learn it from a reference card. We 
have only five commands. We could 
have had a manual that just ex- 
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plained the five commands. But this 
manual is part of our user interface. 

Let's talk about manuals. We have 
a long, cross-referenced, handmade 
index. A lot of work went into this. 
Before we did this we typeset the 
manual for testing because we want- 
ed people to feel they had a finished 
product. Then we got feedback not 
only on the product but also on the 
manual, so what people get as our 
first-edition manual is a tested man- 
ual. Manuals are an integral part of 
the product, not an afterthought. 
This whole product was designed 
from the very beginning with the 
manual in mind. In fact, the very 
first thing I did when I started the 
company was write my dream man- 
ual for this product. Then I built it 
and finally wrote a real manual. 


DDJ: That brings to mind Apple’s ad 
that boasts of the minute amount of 
documentation needed to learn the 
Mac compared to an IBM computer. 


Excellence 


Raskin: Our first idea was to have a 
thin manual. We tried that—experts 
said, ‘‘Wonderful,”’ but beginners 
said, “I don’t know what I’m doing.” 
If you say that an insert command 
undoes the latest block delete, people 
may have forgotten what a block de- 
lete is and insert is a funny word. We 
wrote the manual so we explained 
everything. If we had to explain 
something five times, we explained it 
five times. Don’t get lazy in the 
manua!! 


DDJ: Beyond modelessness and mo- 
notony, what else do you have in 
mind as you develop a product? 

Raskin: One of the most important 
concepts is that things you do fre- 
quently must be fast. Things that you 
do infrequently can be slower. Peo- 
ple have critiqued our way of setting 
the widths of paragraphs, saying it 
seems a little baroque, but you hard- 
ly ever do it. One thing you do very 
often is move the cursor, and one of 
the big advances of this product is 
the cursor-moving mechanism. This 
was not theoretical. It hit me while 
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driving through Marin with my 
wife. No amount of theoretical analy- 
sis will give you a better system with- 
out inspiration. I know of no way of 
automating that process. 


DDJ: But you began with an antipa- 
thy toward the mouse? 

Raskin: I happen to hate mice, and I 
have since 1973 when I first started 
using them at Xerox PARC. I always 
preferred joysticks. I did want a dif- 
ferent cursor-moving mechanism on 
the Macintosh. That was designed as 
a graphic machine, and you do need 
a graphic cursor-moving device. 
SwyftCard is nongraphic and doesn’t 
need a graphic device. (At this point 
Raskin started to demonstrate the 
SwyftCard while he talked. ) 

First of all, it does not require you 
to move your fingers from home 
row, and it uses your thumbs, which 
are under-utilized fingers. Even in 
touch-typing the right thumb is used 
for the space bar only; the left thumb 
does nothing. Strangely enough, the 
Dvorak keyboard, for all its supposed 
efficiencies, doesn’t use the thumbs 
either. 

To get anywhere in about 20 pages 
of text, you have to type an average 
of 3% characters. Research has 
shown that with cursor-moving keys 
the average time is around ten sec- 
onds, and with the mouse it drops to 
around four seconds. Here it drops to 
around a second. So it’s somewhere 
between two and four times faster 
than a mouse, and it’s a heck of a lot 
less expensive to manufacture. 


DDJ: Had you seen anything like this 
that helped you in the early stages of 
development? 

Raskin: No, after I designed this I 
learned about the Find command in 
EMAX, which is also an incremental 
search. It has a few problems: First of 
all, you have to go into Find mode; 
and second, it ends up on the last 
character of the pattern, which is a 
big mistake. The other thing with 
EMAX is, when you leap somewhere 
and you start typing, you're still add- 
ing into the pattern. So it’s modal, 
and it puts you on the last character. 
It’s only one direction. 

Let me make a typical error. I want 
to move the cursor to the word good, 
so I should press the left Leap key 
and type “good.” I'll press the right 


Dr. Dobb’s Journal, May 1986 


azin N | Ww Advance ~ 
nts for an Old Friend. 
__ ZBasicis an incredibly advanced and 
powerful BASIC—but—it’s still the old BASIC | 
you’ re used to. Instead of spending 6 months of 
/ ie — anoiner complicated oe let 


developmen have produced the ultimate BASIC. 
ZBasic is “Compiled BASIC,” and generates stan 
. 


ae Bonchinark on eee PC’ S 


: Apple Ile, tte | 


ZBasic ™ 
Mbasic ™ 


IBM® PC (oss) 


ZBasic ™ 486 sec. 
Applesoft™ 5,401 sec. 
Z-80 (CP/M™-80, TRS-80™) 
ZBasic ™ 13.7 sec. ZBasic ™ 30 sec. 
BASICA™ 2,190 sec. Mbasic ™ 2,520 sec. 


10 iterations of the Sieve trom Byte, January, 1983 _ 


ompiler Speed/interpreter Ease. 
____Like a BASIC interpreter, ZBasic allows you 
to write and execute your programs immediately! No 
messy “Linkers,” “Loaders,” or clumsy “Subroutine 
Packages” like most other compilers. To compile 


7.4 sec. 
684 sec. 


_ and edit, simply type “RUN.” Debugging works the _ 


eas the interpreter, too. Just — “BREAK” or 


_ Ifyou're tired of ‘nowes away your old 
ams everytime you switch to a new computer, 
is for you. Source code is portable from one 

mputer to another, and since ZBasic uses Device 

Yendent Graphics and Disk File commands, 

programs automatically “Adapt” to any other 
computer. And the ZBASIC editor is the same 
_onaill versions—regardiess of the comer 


Einstein Math. 

ZBasic offers programmers a math 

pa kage that surpasses anything else in the 

"y! (Yes, ZBasic is even better than _ 

_ FORTRAN, PASCAL, MODULA-2 or any other 
language available!) You will have up to 54 
digits of user-selectable accuracy at your power. 


superb Documentation!” 
The 387 page ZBasic manual is a model 
yand ganization. The documentation is 
ng our impression that someone 
hardtomake ZBasica 
r all other BASIC Compilers.” 
PC WEEK, Nov. 12, 1985 


ructure—If You Want It. 
ips you “Structure” your 
at’s easy and simple...you 
oor with names or line 


the fullest. 





scaraaiitl 


. Anne : 


Customized for YOUR Computer: 


MSDOS™ and Compatibles: Including PC, XT, AT, 
jr., Tandy ™ 500-1200-2000-3000 and all Compags ™. 
Creates fast stand-alone .COM files. Supports a mouse, 
highlights keywords and lots more. 


Macintosh ™: Complete Toolbox ROM calls support, 

creates 68000 Native Code, Macintalk and Appletalk 
} support, program size to 4 megabyte, math accuracy 

from 8 to 240 digits. Incredible program speeds! 


Apple ™ Ile, lic: Mouse support for both the Ile and llc, 
Super Hi-Res graphics support (560x192 and 280x192 
and lo-RES support tool). Advanced Graphics com- 
mands like CIRCLE, BOX, FILL etc. and you can Mix 
Graphics and Text on the screen like a PC. DOS 3.3 


= “ 2 support (PRODOS coming this summer) Requires Apple 


g pe speeds and...was bug 
free and ae solid. And the price is very 


_ Bruce W. Tonkin | 
COMPUTER LANGUAGE ~ 


Garry Ray 


PC WEEK © 


& The best | have ever seen. | love it! You should 
be proud of this " 


ke Mind-blower! Easily t the best BASIC !’ve ever 
seen! J. D. 


a a — lic a 28K & DOS 3.3) = 

: IBM PC & Compatibles « 

K oO ca version (CPA 80) ° * 
Teaco 2.0 a A (Z80 only 


se decisions to use ag abe to 


R. R. Manager | 
Mesa, AZ 


Baltimore, MD _ 


Versions shipping now! 


4 //e or //c with 128K but programs created with ZBasic ™ 


‘ap _will run on a 64K A 


Z80 ™ Machines: CP/M ™-80 2.0+, TRS-80 ™ model 1, 
3 or 4 and a special graphic version for Kaypro CP/M 


1/3, Model. 4/ os 


Send me ZBasic right away! $89.95 complete. 


| CREDIT CARD—MASTERCARD/VISA/AMEXIC.O D 


a Card Expiration Date: 
I My computer is a 


MAIL TO: ZEDCOR, INC. 
4500 E. Speedway, # 93 
Tucson, AZ 85712 


pZBasic 


_ ORDER TOLL-FREE: 


Circle no. 160 on reader service cod 


City —| 


plus shipping 


Name 


Address 


Day Phone 


Arizona fa aatan add 5% Sales 
Tax. In U.S. add $5.00 shipping. 
C.0.D. add $5.00 per order. 
Outside U.S. and Canada, add 
$20.00 per oe for postage 


trademarks of their respective 
companies—Macintosh is a 
trademark of Macintosh 
Laboratories, Inc. 


U.S. currency on ¥ 
, Turbo Pascal, | PC, Fortran, 
Pascal, MODULA COBOL are 


asi 


echnical Support: (602)7 





HUMAN INTERFACE 
(continued from page 34) 


Leap key and type. It found it any- 
way. The system does one thing that 
all systems should have done from 
day 1: If you tell it to search one way 
for something and it doesn’t find it, it 
searches the other way in case you 
made a mistake. Most systems didn’t 
do this because if you did find it then 
you ve lost your place. In this system 
if you want to go back, you just bang 
on the keyboard. (Raskin slams both 
hands on the keyboard, and the cur- 
sor returns to the point in the docu- 
ment at which his search began. ) 

The other thing about this system 
that allows us to use this paradigm is 
that the longest search and display 
through all the text takes 300 milise- 
conds. Cursor motion is very impor- 
tant, and we've got it better than any- 
one. Speed is very important, and 
here on a stupid old 6502 running at 1 
megahertz, we're moving the screen 
and doing things faster than you will 
see on any computer from any man- 
ufacturer at any price with any- 
body's software. 


DDJ: On the Mac development team, 
was there an absence of theoretical 
drive? 

Raskin: The original team was Bud 
Tribble and myself for software de- 
velopment. When Steve took over, 
Bud Tribble left. And I left. He then 
brought in a group of people who es- 
sentially implemented a standard op- 
erating system and just put a differ- 
ent appearance on the front of it. 
There was a strong theoretical drive 
initially; all the people who were do- 
ing that left. Our name for the word- 
processing program you get with the 
Macintosh is Macwait. If a little clock 
ever appears on a computer of mine, 
I'll shoot it. A computer is supposed 
to be fast. 


DDJ: Could you talk about the cursor 
design on SwyftCard? 

Raskin: One of the things we’ve 
done is we've paid a lot of attention 
to details people have taken for 
granted for years. The way I've got- 
ten out of my ruts is by watching 
people try to learn to use our own 
systems. The cursor is in two parts. 
There is the blinking part, which we 
call the cursor, and the other part, 
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which we call the highlight. The rule 
is, when you type a character, it will 
always appear where a blinking cur- 
sor is, and whatever character was 
underneath it gets moved out of its 
way. Always. It will never happen to 
the right or left of the cursor. The 
highlight is where the next character 
to be deleted will be deleted when 
you press the Del key. When you're 
typing it shows exactly what's hap- 
pening. I don’t know how many 
times I’ve made the mistake of mis- 
positioning a cursor on a system that 
deletes to the left and inserts to the 
right, like on the Macintosh. That 
causes a lot of confusion. 

We spent six months before we re- 
alized a cursor has to be in two parts. 
We played with cursors between the 
letters, on the letters, cursors that 
flickered back and forth—dozens of 
designs. You always want to use a 
left delete after you've been typing. 
If you move the cursor somewhere, 
you always think of words from the 
beginning of the words. You move 
there, and you always want to delete 
the other way after you’ve moved 
the cursor. We observed that to be a 
99 percent phenomenon. So we have 
it automatically. Whenever you leap, 
the cursor knows to delete to the 
right, and whenever you re typing, it 
automatically backspaces. This is def- 
initely modal, and once in a blue 
moon you will make a mode error. 
You will press Delete and take out 
the wrong character. But it’s so much 
gain. 


DDJ: So you've eliminated many 
commands normally found in an ap- 
plication, especially in a program 
with several applications. 

Raskin: Throwing out commands is 
a very big thing. This system does 
word processing, information re- 
trieval, telecommunications, and cal- 
culations, and it has five commands. 
Any other word processor has more 
than five. 


DDJ: You've complained that the Mac 
ended up with a traditional operat- 
ing system. How does your system 
differ? 

Raskin: We threw out the whole 
concept of an operating system. By 
definition, an operating system is the 
program you have to fight with be- 
fore you can fight with an applica- 


tion. For a single-user system on 
which you're not developing soft- 
ware, who needs an operating sys- 
tem? There is no operating system 
running underneath this. The editor 
runs right on the bedrock of the sili- 
con. There are no menus. You know 
that people like broad, flat menus 
rather than deep menus. What is the 
broadest and flatest menu you can 
imagine? A few things labeled on the 
fronts of keys. Everything is avail- 
able instantaneously and simulta- 
neously. If I want to look up a tele- 
phone number, I don't have to get 
into Information Retrieval mode, I 
just use the Leap command. Leap is 
information retrieval. If I want to do 
a calculation, do I say ‘‘Calculation 
mode” or pull down the calculator? 
No, I simply type the equation and 
press the Calc button. That's the way 
it should always have been. 


DDJ: The most basic concept to most 
interfaces is the separation between 
applications. 

Raskin: In today’s world! In tomor- 
row’s world, interfaces like this will 
clobber the usual present kind, and 
in a few years many kinds of prad- 
ucts will have this kind of interface. 


DDJ: What’s held people up from see- 
ing this sort of integration? 

Raskin: We already have integrated 
software, and that’s integration by a 
menu. We call this homogenized. 
Why didn’t I see this years ago? I 
have no idea. 


DDJ: Can any application be 
homogenized? 

Raskin: Yes. You name it, and I can 
homogenize it. The basic principle 
can be applied to all applications that 
I know of on computers. The work 
we've done here can be applied to 
any computer, small or large, and 
any application. 


DDJ: Given the right hardware? 

Raskin: Given the right software. 
Most people think the Apple II is the 
wrong hardware for any spiffy hu- 
man interface. Part of the problem is 
this doesn’t show up on television. 
All you see is your work. But isn’t 
that what you want to see? Do you 
want to see the computer mecha- 
nism, or do you want to see your 
work? We don’t waste any of the 
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SAS Institute Inc. 
Announces 


Lattice C Compilers for Your IBM Mainframe 


Two years ago... 

SAS Institute launched an effort to develop a 
subset of the SAS® Software System for the 
IBM Personal Computer. After careful study, 
we agreed that C was the programming 
language of choice. And that the 

Lattice® C compiler offered the quality, 
speed, and efficiency we needed. 


One year ago... 

Development had progressed so well that we 
expanded our efforts to include the entire 
SAS System on a PC, written in C. And to 
insure that the language, syntax, and 
commands would be identical across all 
operating systems, we decided that all future 
versions of the SAS System —regardless of 
hardware—would be derived from the same 
source code written in C. That meant that 
we needed a C compiler for IBM 370 main- 
frames. And it had to be good, since all our 
software products would depend on it. 

So we approached Lattice, Inc. and asked 
if we could implement a version of the 
Lattice C compiler for IBM mainframes. 
With Lattice, Inc.’s agreement, development 
began and progressed rapidly. 


Today... 
Our efforts are complete—we have a first- 
rate IBM 370 C compiler. And we are 
pleased to offer this development tool to 
you. Now you can write in a single 
language that is source code compatible with 
your IBM mainframe and your IBM PC. We 
have faithfully implemented not only the 
language, but also the supporting library and 
environment. 

Features of the Lattice C compiler for 
the 370 include: 


@ Generation of reentrant object code. 
Reentrancy allows many users to share 
the same code. Reentrancy is not an 
easy feature to achieve on the 370, 
especially if you use non-constant 
external variables, but we did it. 

@ Optimization of the generated code. We 
know the 370 instruction set and the 
various 370 operating environments. We 
have over 100 staff years of assembler 
language systems experience on our 
development team. 

@ Generated code executable in both 
24-bit and 31-bit addressing modes. You 
can run compiled programs above the 
16 megabyte line in MVS/XA. 

@ Generated code identical for OS and 
CMS operating systems. You can move 
modules between MVS and CMS 
without even recompiling. 

@ Complete libraries. We have 
implemented all the library routines 
described by Kernighan and Ritchie (the 
informal C standard), and all the library 
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routines supported by Lattice (except 
operating system dependent routines), 
plus extensions for dealing with 370 
operating environments directly. 
Especially significant is our 
byte-addressable Unix®-style I/O 
access method. 

@ Built-in functions. Many of the 
traditional string handling functions are 
available as built-in functions, generating 
in-line machine code rather than function 
calls. Your call to move a string can result 
in just one MVC instruction rather than a 
function call and a loop. 


In addition to mainframe software 
development, you can also use our new 
cross-compiler to develop PC software on 
your IBM mainframe. With our cross- 
compiler, you can compile Lattice C 
programs on your mainframe and generate 
object code ready to download to your PC. 

With the cross-compiler, we also offer 
PLINK86™ and PLIB86™ by Phoenix 
Software Associates Ltd. The Phoenix link- 
editor and library management facility can 
bind several compiled programs on the 
mainframe and download immediately 
executable modules to your PC. 


Tomorrow... 

We believe that the C language offers the 
SAS System the path to true portability and 
maintainability. And we believe that other 
companies will make similar strategic 
decisions about C. Already, C is taught in 
most college computer science curriculums, 
and is replacing older languages in many. 
And almost every computer introduced to 
the market now has a C compiler. 


i want to learn more about: 


C, the language of 
choice... 


C supports structured programming with 
superior control features for conditionals, 
iteration, and case selection. C is good for 
data structures, with its elegant implemen- 
tation of structures and pointers. C is 
conducive to portable coding. It is simple 
to adjust for the size differences of data 
elements on different machines. 


Continuous support... 

At SAS Institute, we support all our 
products. You license them annually; we 
support them continuously. You get updates 
at no additional charge. We have a 
continuing commitment to make our 
compiler better and better. We have the 
ultimate incentive—all our software 
products depend on it. 


For more information... 
Complete and mail the coupon today. 
Because we've got the development tool for 
your tomorrow. 


® 


SAS Institute Inc. 

SAS Circle, Box 8000 

Cary, NC 27511-8000 

Telephone (919) 467-8000 x 7000 
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HUMAN INTERFACE 
(continued from page 36) 


screen with indicators or messages. 
It’s all yours. On a 64K Apple II with 
our system, the user gets 40K. If you 
buy a 128K Mac and MacWrite, you 
get 20K out of 128K. Our entire code 
for this product is 14.5K. Nobody 
even thinks you can write an appli- 
cation, much less four or five appli- 
cations, in under 16K bytes. Those 
numbers have not been heard for 
years. Go back to the early days of 
DDJ! 


DDJ: But you must feel some frustra- 
tion with this product on the Apple 
II? 

Raskin: Sure. The keyboard layout 
isn't optimal. The Leap keys should 
be larger. They weren't designed for 
leaping use. There are many applica- 
tions on other hardware that we sim- 
ply don't do here. For one thing, we 
don't have the spreadsheet integrat- 
ed because the Apple finally ran out 
of power at a certain point. But the 
hardware is not so important. And 
the amount of stuff you can do with 
an 8-bit processor and even 16K bytes 
of memory have not been exhausted 
by humanity and will never be. 

People like Steve Jobs say that the 
way to get simplicity is greater com- 
plexity. Well, they don’t put it quite 
that boldly. What they say is, if we 
have intelligent enough systems and 
big enough systems, we can make 
them very easy to use. I have this stu- 
pid idea of simplicity via simplicity — 
and for many applications it works. 
I'm not denigrating all of AI and that 
stuff. I think there’s a lot to be gained 
from it but not for little things that 
people are going to use on an every- 
day basis. 

I was a visiting scholar in the artifi- 
cial intelligence lab at Stanford, and I 
had an office at PARC. I was never an 
employee at PARC. 


DDJ: So you think the mouse created 
a barrier toward designing better 
user interfaces. What’s better for 
graphics? 

Raskin: My favorite graphic input 
device is a tablet. That’s what I find 
easiest to use. It feels like a pencil. I 
spent years practicing, using pencils. 
I've thought the mouse was a mistake 
for a decade and a half now. I think 
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it’s being foisted on a lot of people. 
When I go to a conference and | tell 
people why I hate a mouse, I usually 
get applause. 


DDJ: Specific applications create cer- 
tain needs in interface design. What's 
an example of this? 

Raskin: Most people who do a lot of 
heavy telecommunications end up 
having two computers because, if 
you want to receive messages at an 
arbitrary time, you have to leave 
your telecom package up. With your 
telecom package up, you can’t do 
anything else. On this system, it’s al- 
ways in Telecom mode. If you send 
me a message, whether I’m working 
or not, I won't be interrupted. If I’m 
not there, it’ll just accept it; if I am 
there, I can finish my thought and 
then read your message. So here’s a 
place where modelessness buys you 
a whole computer. 


DDJ: Have the main issues changed in 
terms of what a programmer wants 
and a user needs? 

Raskin: I think so. There are some 
programmers I haven't hired here 
because they say, ‘‘Hey I’m not going 
to get a chance to hack at systems or 
Unix or anything like that here.” The 
programmers we do have here have 
as their first priority making things 
work well with people. That means 
you can't have an interest in develop- 
ing a new and better operating sys- 
tem. In a few years all computer-sci- 
ence departments will have 
user-interface courses; some do now. 
And that will become more and 
more recognized as legitimate and 
worthy. We have to have a stronger 
theory of human interfaces. Part of 
what I’m doing is developing such a 
theory in my spare time. 


DDJ: What would you concentrate 
on in a user-interface class? 

Raskin: First of all, you've got to get 
people to recognize when they’re 
having trouble. People always say, 
“It's me,” but it’s the computer de- 
sign that’s so dumb. So first, you have 
to get programmers out of the cocky 
position of believing they know how 
to design stuff and to a humble posi- 
tion that if a person is having a prob- 
lem, it’s not the person who’s dumb, 
it's a dumb design. That’s the start. 
And have them learn statistics and 


experimental design. And then un- 
derstanding how human beings 
learn and work—cognitive psycholo- 
gy and learning theory. 


DDJ: Will different languages help in 
the creation of better interfaces? 
Raskin: Definitely. We used Forth. 
That helped us here because it was 
small and runs like a bat out of hell. 
You don’t have many compunctions 
about dropping down to assembly 
language if you really need speed. So 
for sheer performance, it was a good 
choice. For human-interface design, 
most of the languages like PROLOG 
and LISP or APL are totally inappro- 
priate. I've been reading some arti- 
cles about people writing simulators 
on which you can test human design 
interfaces. They say it’s very slow, 
which invalidates it. Unless they can 
simulate the real speed, they’re not 
getting any useful data. There’s no 
language per se. 


DDJ: What thoughts did you have 
along these lines while you were do- 
ing things for DDJ? 

Raskin: Go back and read the very 
first article I ever published in 1976 
in DDJ. Read Jim Warren's little com- 
ment about me at the bottom. /“Jef 
Raskin is well known for his heretical 
belief that people are more important 
than computers and that computer 
systems should be designed to allevi- 
ate human frailties, rather than have 
the human succumb to the needs of 
the machine.”’] It’s still true, word for 
word. I've been trying to fulfill that 
belief ever since. 


DDJ 
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NEW RELEASE 


Ecosoit’s Eco-C88 Rel. 3.0 C Compiler 


Release 3.0 has new features at an unbelievably low price. ECO-C88 now has: 

@ Prototyping (the new type-checking enhancement) 

@ enum and void data types 

@ structure passing and assignment 

@ All operators and data types (except bit fields) 

@ A standard library with more than 200 functions (many of which are System V 
compatible for greater code portability) 

@ cc and mini-make that all but automates the compile process 

@ 8087 support (we sense the 8087 at runtime — no dual libraries) 

m@ ASM or OBJ output for use with MSDOS linker 

m@ Tiered error messages — enable-disable lint-like error checking 

@ Fast compiles and executing code 

@ Expanded user’s manual 

m@ Enhanced CED program editor (limited time offer) 











We also offer the following support products for Eco-C88. 


CED Program Editor $ 2995 


CED now supports on-line function help. 

If you've forgotten how to use a standard library function, just type 
in the name of the function and CED giv es you a brief summary, 
including function arguments. CED is a full screen editor with 
auto-flagging of source code errors, multiple windows, macros, and 
1s fully configurable to suit your needs. You can edit, compile, link, 


and execute DOS commands from within the editor. Perfect for use - 


with Eco-C88. For IBM PC, AT and look alikes. 


C Source for Standard Library $ 10 


Contains all of the source code for the library 


functions that are distributed with Eco-C88. ex- ($20 if not 
cluding the transcendentals and functions written with order) 
in assembler. 


Developer’s Library $ 2 * 


Contains the source code for all library functions, 

including the transcendentals and those written in ($50 if not 
assembler. Perfect for the developer that wish to with order) 
write their own custom functions or learn how 

we implemented the Eco-C88 library. 


ISAM Library $ 15 


Contains the code from the C Programmer’s 
Library in relocatable format (i.e., .OBJ) includ- ($30 if not 
ing the delete code for the ISAM file handler. with order) 


Eco-C88 C compiler requires an IBM PC, XT, or 
AT (or compatible) with 256K of memory, 2 
disk drives and MSDOS 2.1 or later. Call today: 

















1-800-952-0472... 
1-317-255-6476 vos 


EG Ecosoft, Inc. 
ECOSsOFTMINc. 6413 N. College Ave. @ Indianapolis, IN 46220 


C Programming Guide $ $9) () 


After reading the Ist edition, 

Jerry Pournelle (BYTE Magazine) said: “I recom- 
mend this book... Read it before trying to tackle 
Kernighan and Ritchie.” The second editon ex- 


* §} pands this best seller and walks you through the C 
g language in an easy-to-understand manner. Many 


of the error messages include references to this 
book making it a perfect companion to Eco-C88 
for those just starting out with C. 


C Self-Study Guide ¢ t/ 


(Purdum, Que Corp.). Designed 

for those learning C on their own. The book is filled 
with questions-answers designed to illustrate many 
of the tips, traps, and techniques of the C language. 
Although written to complement the Guide, it may 
be used with any introductory text on C. 


C Programmer’s $ 2 () 
Library 

(Purdum, Leslie, Stegemoller, Que Corp.). This 
best seller is an intermediate text designed to teach 
you how to write library functions in a generalized 
fashion. The book covers many advanced C topics 
and contains many useful additions to your library 
including a complete ISAM file handler. 
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Its amazing what you 
can reveal when you strip. 


Introducing a shape that’s about to turn on an Simply by plugging the Cauzin Reader into your 


entire industry. serial or cassette port and placing it over the strip. 
The Softstrip” data strip. From Cauzin. The reader scans the strip, converts it to com- 
This new technology allows text, graphics, and puter code, and feeds it into any standard communi- 

data to be - cation interface. 

encoded on a Because strips are so easy to gen- 


strip of paper, 





erate, most of your favorite magazines 










then easily sci Sl ease Ae SIE EU aad and books will soon be using them in 
entered into and reading it into your computer: addition to long lists of program code. 
your computer using a scanning device called the And you'll =a 
Cauzin Softstrip ” System Reader be able to enter 
Creating a simple, reliable and cost efficient programs with- 
way to distribute and retrieve information. out typing a 
Softstrip data strips, like those you see here, can single line. 
contain anything that can be put on magnetic disks. Thereis |g 
Facts. Figures. Software programs. also softwarefor 
Video games. Product demonstrations. you to generate [== = =. 
Sheet music. se your OWN Strips. —————_—_— oe 
i Letting you Soon everyone will be stripping as data strips appear in 
| | ) oe sen d eve ry- popular magazines, computer books and text books. 
i. - thing from correspondence to business information 
L 5 using our new technology: 


a 


Find out how much you can reveal by 
stripping. Just take this ad to your computer dealer 
for a demonstration of the Cauzin Softstrip 


: System Reader 
theCedt Mea ieee Or for more information and the name of the 
oi ek aie Maen tices | dealer nearest you, call Cauzin at 1-800-533-7323. 

Asingle strip can hold up to 5500 bytes of In Connecticut, call 573-0150. 
encoded data. ; Shiai : 

It can stand up to wrinkles, scratches, ink Po 
marks, even coffee stains. Softstrip 

And it can be entered into your computer with oleae 
a higher degree of reliability than most magnetic media. 835 South Main St., Waterbury, CT 06706 


Apple® and Macintosh® are registered trademarks of Apple Computer Inc., Apple® is a registered trademark of Apple Records, Inc., 
Softstrip® and the Softstrip® System Reader are trademarks of Cauzin Systems, Inc., IBM® is a registered trademark of IBM, Inc. 
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Someone once said that there is nothing new under the sun. Wouldnt life be boring 
if that were indeed true? The data strips on the right contain the program described 
in the article “The Game of Life in Expert-2”, by Jack Park, which appears in this 
issue. Its a prime example of how something, in this case the game of LIFE itself, 
can, indeed be improved. 
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The game of LIFE was invented years ago by John Horton Conway. Over the years, 
the game has evolved into a popular cerebral exercise for programmers and math majors 


alike. At first the game was played on graph paper, but the advent of modern technology iH i | | I Hh tt 
moved it to the computer which plays the game thousands of times faster. Now millions i M1 iN { t ; i It i i 
of computer enthusiasts ate captivated by this devilishly simple, yet marvelously si i th | l Hl i il i, | 
complex quintessential computer diversion. si i i el ( i aan i 
The rules of the game are quite simple. Imagine that you have an infinite grid of ate i i ti | i 


squares, each one being either alive (on) or dead (off). Each square (called a ‘‘cell”) 
lives or dies into the next cycle (called a ““generation’) based on its current state and 
that of its neighbors. The grid of cells is represented by a graphic display on your 
computer screen. After setting up an initial configuration of living and dead cells, 
you start the simulation. The patterns will change on the screen as cells live and die. 


Mr. Park's improvement on the theme is interesting because of his approach. Instead 
of writing a traditional program for the simulation, he has created an array of intelligent 
cells using an inference engine written in Expert-2, a superset of FORTH. 

Read in the data strips, following the directions that came with your Cauzin reader, 


Youll need the Expert-2 programming environment to operate this program. Refer to 
Mr. Park's article in this issue for operating instructions. 
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ARTICLES 


Simple Plots with the 
Enhanced Graphics Adapter 


ecently I needed to generate 
R some engineering graphs on 

an IBM Enhanced Color Dis- 
play with the Enhanced Graphics 
Adapter (EGA). I was using a program 
written in Lattice C Version 2.14 to do 
the computations, and all I needed 
was the capability to draw a simple 
x-y plot, taking advantage of the 
EGA’s 640-by-350 pixel high-resolu- 
tion mode. An obvious solution 
would have been to use IBM’s Graph- 
ics Development Toolkit, but it 
seemed to be the wrong tool for the 
job I had in mind. 

I assembled my resources. The 
ROM BIOS video functions (interrupt 
10h) came to mind; a quick search of 
the Lattice C reference manual pro- 
duced the int86() utility function. 
Armed with these tools, I wrote a set 
of graphics functions to do my job. 
Here I present the most interesting of 
these modules, which set the display 
in high-resolution graphics mode 
and perform line drawings. 

The EGA can be set up to operate at 
its highest resolution mode by using 
the mode number 16 in the ROM BIOS 
video interrupt. In its basic configu- 
ration with 64K RAM, this mode al- 
lows four colors. The 640-by-200 
pixel resolution of the Color Graphics 
Adaptor (CGA) can be emulated by us- 
ing mode number 74. 

The BIOS provides a function that 
allows you to write a pixel; I needed 
a module that could join two points 
on the screen. This meant that I had 
to brighten up a lot of pixels that are 
close to an imaginary line drawn be- 
tween the two end points. A tool to 
help me do this was close at hand— 
in DDJ, in fact. 

The May 1985 issue (#103) con- 
tained the article ‘‘Using Decision 


Nabajyoti Barkakati, 2005 Aventurine 
Way, Silver Spring MD 20904 
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by Nabajyoti 
Barkakati 


I needed a module 
that could join two 


_ points on the screen. 





Variables in Graphics Primitives’ by 
Tom Hogan, in which the author 
generalized Bresenham’s decision 
variable method. Bresenham’s origi- 
nal algorithm for line drawing is de- 


scribed in the book Fundamentals of 


Interactive Computer Graphics by 
James D. Foley and Andries Van Dam 
(Reading, Mass.: Addison-Wesley, 
1982). The algorithm in the book 
works for lines with slopes between 
0 and 1, but can be easily modified to 
work with lines of arbitrary slope. I 
have made such modifications in my 
line drawing function. (See v_draw 
in Listing Two, page 74.) Note that I 
have chosen to represent the lower 
left corner of the screen as the pixel 
(0,0), though the upper left corner is 
considered to be the origin in IBM's 
ROM BIOS. 

In Listing One, page 74, I show a 
sample program that plots sin(x) vs. x 
on the screen. It’s a simple demon- 
stration of the use of graphics primi- 
tives. A better way to use the capabil- 
ity would be to write a module that 
would nicely map the arrays y and x 
of size n onto the screen. It would 
first find the true maxima and mini- 
ma of the data, pick a nicer set of 
numbers for these extremes, then 
scale each point onto screen coordi- 
nates and use v_draw to draw linear 
segments on the screen to make the 
plot. A coordinate grid under the plot 


would make the output even more 
attractive. But all this follows natu- 
rally once you can connect any two 
points on the screen, which is what 
the code presented here permits. I’m 
sure you wouldn't want me to take 
away all the fun of setting up your 
own customized plotting package. 


Bresenham’s decision variable 
method, as Hogan explained in his ar- 
ticle, can be used to generate any well- 
behaved curve of the form G(x,y)=0. 
Hogan’s implementation of the algo- 
rithm was intended for medium-reso- 
lution graphics; Barkakati’s interest is 
with the considerably higher resolu- 
tion EGA affords. 

What Bresenham’s method gains 
you is chiefly speed, an important con- 
sideration when doing high-resolution 
curve drawing. Rather than comput- 
ing square roots for every point, it de- 
pends heavily on integer math. It also 
creates curved line segments without 
gaps, a feature that leads to smoother- 
looking curves. Based on the value of 
the slope of the tangent line and the 
direction of its change, the method de- 
cides where, in relation to the last 
point, the next point goes. The slope 
doesn't have to be calculated for each 
point; key inflection points merely 
need to be identified. The slope and 
how it is changing can be used to select 
from all possible next points a pair of 
candidate points and to choose be- 
tween these—the decision variable 
part of the approach. At any given lo- 
cation only two next points are reason- 
able, and the method finds them and 
chooses between them.—ed. 


DDJ 


(Listing begins on page 74.) 
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like bar graphs, pie charts, exploded 
pie charts, marked point graphs, line 
charts, and XY charts. 

To order, for the name of your 
nearest dealer, or for more informa- 
tion, call the Ashton-Tate Publishing 
Group at 800-437-4329, Ext. 242. 

Sure you need C to be on the 
leading edge. 

But you don't have to give up 
dBASE to get it. 


dBASE 
TOOLS 
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Cc Routi mae for Finance, Statistics, and Programming. 





43 


ARTICLES 


A 68000 Cross 





Assembler—Part 2 


by Brian R. Anderson 
ast month I introduced a Mo- checks the range of the LONG and re- 


L, dula-2 cross assembler for the 
Motorola 68000 16/32-bit mi- 
croprocessor. In that first install- 
ment, I looked at the overall struc- 
ture of the program from a data flow 
perspective and presented all defini- 
tion modules as well as the main pro- 
gram module. 

This month, I will discuss some of 


the algorithms used and present all of | — 
the implementation modules along | 
with a stand-alone program to initial- | — 


ize the mnemonic lookup table. 

Although this project was devel- 
oped on a Z80 system using the Mo- 
dula-2 System for Z80 CP/M from 
Hochstrasser Computing AG, the 
source code should compile and run 
on most other small-computer imple- 
mentations of Modula-2. I will try to 
identify those areas that may be im- 
pediments to portability. The only 
true machine dependency is because 
of the assumption that INTEGERs, 
CARDINALS, and BITSETs all occupy 16 
bits in memory. Although not all Mo- 
dula-2 libraries are equivalent, I have 
tried to restrict myself to library rou- 
tines that are common to both the 
Hochstrasser and the popular Voli- 
tion Systems compilers. That should 
allow a fair degree of portability 
across many different compiler sys- 
tems. 

In Modula-2, the definition module 
is like a contract. It tells the users of 
the module (that is, programmers) 
what tasks will be performed with- 
out saying anything about the meth- 
ods used. Definition modules are com- 
piled separately and provide the only 
interface to other modules or to the 
main program module. The defini- 
tion modules presented last month in- 


Brian Anderson, 2977 East 56th Ave., 
Vancouver, B.C. V5S 2a2 Canada 


tt 


In Modula-2, the 
definition module is 
like a contrast. It says 
what tasks will be 


_ performed without 


saying anything 
about the methods. 





dicated the tasks that are to be per- 
formed during the execution of 
X68000; the implementations present- 
ed this month describe the algorithms 
used to accomplish those tasks. 


LongNumbers 

The data type LONG (an array of inte- 
gers) simulates 32-bit hexadecimal 
numbers; the implementation mod- 
ule for LongNumbers (Listing Eleven, 
page 80) provides procedures that in- 


put, manipulate, and output the. 


LONG data type. 

LongClear simply clears all ele- 
ments of the array to 0. LongAdd 
(LongSub) is a multiple precision rou- 
tine that uses an integer for a carry 
borrow( ) flag. The idea is to index 
through the array, calculating the 
sum (difference) while checking for 
any overflow (underflow); such an 
overflow (underflow) causes the car- 
ry borrow( ) flag to be set and the re- 
sult to be adjusted. This carry bor- 
row( ) is then figured into the next 
digit’s calculation. 

The conversion routines Card- 
ToHLLong and LongToCard use the 
standard hexadecimal/decimal con- 
version algorithms, with the addition 
of range checking. LongToCard 


turns FALSE if any of the four most 
significant digits are anything but 0. 
LongToiInt is a bit more complicated 
because there are two possible in- 
range conditions: either all unused 
bits must be Os (positive integer), or 
all must be 1s (negative integer). 

LongInc and LongDec use LongAdd 
and LongSub respectively, as well as 
CardToLong, to increment or decre- 
ment a LONG data type by any value 
in the CARDINAL range. LongCompare 
uses the standard comparison algo- 
rithm often used to compare strings. 

LongPut and LongWrite cause out- 
put of an array of integers as hexa- 
decimal numbers. They both use an 
internal filter routine called GetDigit 
to trap integers outside the hexadeci- 
mal range. The Size parameter is 
used to allow LongPut and LongWrite 
to output only a portion of the num- 
ber in cases where a small hexadeci- 
mal number is stored as a LONG or to 
output extra long strings of hex digits 
for the S-records. 

StringToLong converts an array of 


characters into a variable of type 


LONG. Error checking is done by the 
IsHEX routine, and GetHEX handles 
the digit-by-digit conversion. The 
two address-bounds routines use the 
set operator IN to force a LONG to spe- 
cific address boundaries. | 


CmdLin2 | 
I wrote the command line parser 
(Listing Twelve, page 80) as an ex- 
periment: I wanted to see just how 
flexible the Modula-2 pointer struc- 
ture really was. My conclusion is that 
it is just as flexible and powerful as 
the pointer structure in C and much 
easier to understand. 

This module could not have been 
written in Pascal because Pascal 
pointers can reference only vari- 
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ables dynamically created by the 
standard procedure NEW. Modula-2 
pointers can be made to point to any 
data type. 

This routine parses the command 
line buffer of the operating system, 
which is referenced by an absolute 
variable at 80H, into an array of 
pointers to strings. (Absolute vari- 
ables are another new feature of Mo- 
dula-2 and allow any variable to be 
placed at a specific location in memo- 
ry.) The parsing is done without even 
recopying the buffer by setting a 
pointer to the beginning of each ar- 
gument and a null terminator at the 
end (replacing the space that normal- 
ly separates command line argu- 
ments). After all arguments have 
been so processed, ArgV is set to 
point to the pointers. (See Part 1 of 
this series of articles for a description 
of how the pointer is used to retrieve 
the arguments—C programmers will 
feel right at home.) 

The CmdLin2 implementation uses 
a looping construct that is new to Mo- 
dula-2: LOOP ...END. This construct 
has two useful variations: the first is 
an infinite loop; the other, by using 
the optional EXIT statement, allows 
termination anywhere in the loop— 
even allowing multiple termina- 
tions. I know of one university in- 
structor who asks his students to 
prove that WHILE or REPEAT are inap- 
propriate before they are given leave 
to use the LOOP. Some authors refer 
to it as an unstructured loop. I tend to 
agree, instead, with Donald Knuth, 
who feels that all constructs—even 
the lowly GOTO—have an inherent 
structure; if that structure matches 
the structure of the problem, that’s 
the one to use. 

In CmdLin2, there are three EXIT 
statements in the LOOP... END state- 
ment. I went through many trials us- 
ing WHILE and REPEAT, extra Boolean 
variables, and all the usual so called 
structured ‘‘tricks,’’ but none were as 
clear and simple as the LOOP (yet still 
reliable under all conditions of input). 

While reading through a Modula-2 
textbook recently, I came across sev- 
eral examples of a small program 
fragment that was supposed to read 
integers and add them to a sum and 
then stop when something other 
than an integer was read. All three of 
the examples given either used two 
read statements, tested the same con- 
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dition twice, or both. These were 


sum := 0; 


supposed to be examples of the cor- | LOOP 
rect way to use WHILE and REPEAT ReadInt (num); 
loops but were a perfect example of IF Done THEN 


trying to shoehorn the problem to fit 


sum := sum + num; 


the structure. Such examples appear ELSE 
repeatedly in programming texts. EXIT; 
Modula-2’s LOOP... EXIT... END END; 
construct provides a simple and ele- | END; 
gant solution: 
Parser 


(*ReadInt and Done are imported *) 
(* from the standard module InOut 
(* Done is set TRUE if ReadInt . 
(* is successful. 2 


* 
— 


— 


The name for this module is really a 
bit of a misnomer because all it does 
is split up the 68000 source code into 
its components: LABEL, OP-CODE, 


ATRON BUGBUSTERS 
GREASE BORLAND LIGHTNING 


“If I were starting a software company again, from scratch, Atron’s AT PROBE™ would be among my very first 
investments. Without Atron’s hardware-assisted, software debugging technology, the flash of Turbo Lightning™ 


would be a light-year away?’ 



















HOW BORLAND 7 
DOES SO MUCH, —— 
SO WELL, SO FAST | Cow f 


te 


We asked Borland 
International president 
Philippe Kahn to share 
his secrets for rapidly 
taking a good idea and 
turning it into rock-solid 
reality. How does the 
Borland team do so 
much, so well, so fast? 
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SideKick without 0 legate 
Atron’s hardware- 
assisted debuggers. 

“You might say light- 
ning has literally struck 
again. Turbo Lightning 
made number four on 
SoftSel’s Hotlist within weeks of its introduction! And 
again, I say we couldn’t have done it without Atron 
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68K ASSEMBLER 
(continued from page 45) 


SOURCE-OPERAND, and DESTINATION- 
OPERAND (Listing Thirteen, page 80). 
The algorithm is quite primitive in 
that it merely scans the line from left 
to right looking for the various parts 
and transfers them into variables 
called Label, OpCode, SrcOp, and Des- 
tOp. These variables are arrays of 
characters defined in the definition 
part of this module. The location of 
each item is noted for later use in the 


error handling module so that the ex- 
act location of any error can be 
pointed out. 

The most convoluted part of the 
scanning process is picking out de- 
limiters, especially when the normal 
delimiter characters get imbedded 
within parentheses or quotes. The 
problem is handled by a couple of 
flags. ParCnt keeps track of (possibly 
nested) parentheses counts, and In- 
Quotes becomes TRUE inside quotes; 
both are used to prevent incorrect 
detection of delimiters. Parser will 
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and 5 times more powerful ?? 


John Dunbar 
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Cosmos, Inc., 19530 Pacific Highway South, Suite 102 
Seattle, WA 98188, (206) 824-9942, Telex: 9103808627 


dBase III is a trademark of Ashton-Tate. 





Circle no. 282 on reader service card. 


46 


flag an error if any identifier or ex- 
pression is too long. Labels and op- 
codes are limited to eight characters, 
and operands (including expressions) 
are limited to 20 characters. 


SymbolTable 

The implementation of this module 
(Listing Fourteen, page 84) hides a 
data type called SYMBOL and vari- 
ables called SymTab, Top, and Next. 
This is an excellent example of the 
way Modula-2 allows you to separate 
lifetime and scope. These variables 
must exist during the entire time that 
the program is running, as they pass 
on information gathered in assembly 
pass 1 to assembly pass 2. Yet, at the 
same time, you don’t want any ac- 
cess to these variables except 
through the symbol table routines. 
To allow Pascal variables to exist for 
the life of the program, they would 
have to be declared as global, at the 
risk of side effects from unplanned 
access. Modules provide a visibility 
wall between their contents and the 
rest of the program. SymTab, Next, 
and Top cannot be accessed from 
outside SymbolTable (limited scope), 
but they exist for the life of the pro- 
gram (global lifetime). 

The FillSymTab routine simply 
adds a SYMBOL (a record consisting of 
an identifier and a LONG number) to 
the next open position in SymTab 
and returns an error if no room exists. 
SortSymTab uses a Shell sort to place 
the identifiers in alphabetical order 
for easy access. Notice in the Swap 
routine that entire records can be as- 
signed in one statement in Modula-2. 
Not only is this more convenient than 
assignment one element at a time, but 
it is also more efficient: The compiler 
is able to use fast and compact assem- 
bly-language routines to copy the 
data into the new variable. 

ReadSymTab uses a binary search 
to find quickly the value associated 
with any identifier. If the symbol is 
not found, ReadSymTab returns 
FALSE to the calling program. It is 
here, also, that duplicate symbol ta- 
ble entries are flagged (to do it in Fill- 
SymTab would require sorting and 
searching the table after each en- 
try—which is hardly worth the ex- 
tra time!). 

ListsymTab really only returns 
one entry in the table and is used by 
the Listing module to provide a sym- 
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bolic reference table of identifiers at 
the end of the program. 


OperationCodes 

X68000 is a “sort of’ table-driven as- 
sembler (I’m gonna get lots of objec- 
tion to this one!). The mnemonics and 
data that are used to derive the op- 
code bit patterns and all addressing 
mode information come from a file 
called OPCODE.DAT. This file must ex- 
ist on the default disk any time 
X68000 is run because the data must 
be read into the lookup table used in 
the binary search routine to find the 
instructions. X68000 is not a true ta- 
ble-driven assembler because it lacks 
the flexibility to accept tables of vari- 
ous processors and the table (OPCODE- 
DAT) is not a text file. 

In Modula-2, implementation mod- 
ules may optionally specify an ini- 
tialization part. This initialization is 
run on program start-up, before the 
main program runs. The purpose is 
to set initial conditions within the 
module. The initialization for Opera- 
tionCodes (Listing Fifteen, page 86) 
opens the file OPCODE.DAT, and reads 
the data into an array called Tab- 
le68K. This data file is stored in com- 
pact binary format. Instructions is 
the only routine in OperationCodes; 
it uses a binary search routine to find 
the correct mnemonic opcode in 
Table68sK. If found, its bit pattern, as 
well as two SETs consisting of (enu- 
merated) addressing modes, are re- 
turned to the calling program. If the 
opcode mnemonic is illegal (that is, 
not found), an error is flagged by the 
error handling routine in ErrorX68. 


InitOperationCodes 
This program module (Listing Six- 
teen, page 86) is not actually part of 
X68000 but merely creates the data 
file OPCODE.DAT described above. It 
contains most of the same declara- 
tions and definitions that Operation- 
Codes contains as their data types 
and variable have to match exactly. 
The lookup table for the mnemon- 
ics is created by this program one 
mnemonic, bit pattern, and address- 
ing mode at a time. There are 118 
mnemonics (ABCD to UNLK), and each 
is assigned one element of an array. 
Each element of the array is a four- 
field record. After data is assigned to 
the array properly, it is written to a 
disk file using the WriteRec proce- 
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dure. 


Note: The WriteRec procedure 
may not be available on all imple- 
mentations of Modula-2 but may be 
added easily by the programmer. It 
makes use of the generic parameter 
type WORD. Two possible implemen- 
tations are: 


For machines, such as the PDP-11 and 
many microcomputers, in which 
TSIZE (WORD) = 2: 


WriteRec (f : FILE; Rec : ARRAY OF 
WORD); 
VAR 
i : CARDINAL; 
ptr : POINTER TO CHAR; 
BEGIN 
ptr := ADR (Rec); 
FOR i := 0 TO HIGH (Rec) DO 
Write (f, ptr’); 


INC (ptr); (* move 
pointer to next byte *) 
END; 
END WriteRec; 


For machines where TSIZE (WORD) = 
1 and a WriteWord procedure exists: 


WriteRec (f : FILE; Rec : ARRAY OF 
WORD); 
VAR 
i : CARDINAL; 
BEGIN 
FOR i:= 0 TO HIGH (Rec) DO 
WriteWord (f, Rec); 
END; 
END WriteRec; 


Similar routines can be developed 
for reading records, as required by 
the OperationCodes initialization. 

Some libraries provide procedures 
to read or write multiple bytes to a 
file. These usually require the loca- 
tion (an address) and size (in bytes) of 
the record. In this case, Modula-2’s 
low-level facilities may be used to 
read or write the record: 


WriteNBytes (f, ADR (rec), SIZE (rec)); 


CodeGenerator 

This module (Listing Seventeen, next 
month) does more than is suggested 
by its name. The definition module 
of CodeGenerator lists three proce- 
dures: BuildSymTable, which ‘‘gen- 
erates the code” for pass 1 (that is, 
feeds the symbol table); AdvAddrCnt, 


Byte Magazine called it. 


“CIARCIA’S 
SUPER 
SYSTEM’ 






The SBI80 
Computer/Controller 


Featured on the cover of Byte, Sept. 1985, 
the SB180 lets CP/M users upgrade to a 
fast, 4’ x 7%” single board system. 


© 6MHz 64180 CPU 


(Z80 instruction superset), 256K RAM, 
8K Monitor ROM with device test, disk 
format, read/write. 
@ Mini/Micro Floppy Controller 
(1-4 drives, Single/Double Density, 
1-2 sided, 40/77/80 track 3%'’ 5%"’ 
and 8” drives). 
@ Measures 4’ x 7%’! with mounting holes 
@ One Centronics Printer Port 
® Two RS232C Serial Ports 
(75-19,200 baud with console port 
auto-baud rate select). 
© Power Supply Requirements 
+5V +/-5% @500 mA 
+12V +/- 20% @40mA 
© ZCPR3 (CP/M 2.2/3 compatible) 
© Multiple disk formats supported 
e@ Menu-based system customization 





$B180-1 
SB180 computer board w/256K 
bytes RAM and ROM monitor 


meh sbapeubes siewuvesesteubie. ieee $369.00 
SB180-1-20 

same as above w/ZCPR3, ZRDOS 

and BIOS source............. $499.00 


-Quantity discounts available- 





NEW 
COMM 180-M-S 


optional peripheral board adds 
1200 bps modem and SCS! 
hard disk interface. 





TO ORDER 
CALL TOLL FREE TELEX 
1-800-635-3355 643331 


For technical assistance or 
to request a data sheet, call: 


1-203-871-6170 






es Micromint, Inc. 
25 Terrace Drive 
Vernon, CT 06066 


a7 


68K ASSEMBLER 
(continued from page 47) 


which increments the address count- 
er after each instruction is analyzed 


(used in both passes); and GetObject- 
Code, which (with the help of many 
other procedures in CodeGenerator 
and SyntaxAnalyzer) figures out the 
machine code and returns it to the | 


main program as three LONGs. I will 
(as far as possible) try to present the 
procedures in the order that the code 
would pass through them during as- 
sembly. This will mean some refer- 
ences to SyntaxAnalyzer, as these 
modules are tightly coupled and are 
used in both passes. 

BuildSymTable is used only during 
pass 1, and, as was mentioned above, 


Modula-2 Porting Experience 


Background 

Modula-2 is a relatively young lan- 
guage, and efforts to standardize 
both the basic language and the li- 
brary are still underway. Modula-2 
was developed at the Swiss Federal 
Technical Institute (ETH) in the late 


70s by a team headed by Niklaus 


Wirth, the creator of Pascal. 


The original language definition 


was contained in Programming in 
Modula-2 by Niklaus Wirth, 2d ed. 
(New York: Springer-Verlag, 1983). 
On March 3, 1984, Wirth released a 
brief entitled ‘‘Revisions and Amend- 
ments to Modula-2,” which outlined 
several clarifications, revisions, and 
extensions to the language itself. This 
brief was published more recently in 


the January/February 1985 issue of 
The Journal of Pascal, Ada, & Mo- 


dula-2; the changes have also been in- 
corporated into the third edition of 
Wirth’s book. Most microcomputer 
compilers have not yet implemented 
these changes or have implemented 
only some of them. 

The library, too, exists in several 
versions. In his original work, Wirth 


postulated a standard minimum li- 


brary—much of it for the DEC PDP-11 
minicomputer. Since then, a much 
more extensive library has been de- 
veloped for the Lilith, the Modula-2 
bit-slice microcomputer developed 
at ETH. One of the earliest (popular) 


microcomputer implementations of 


Modula-2 was by Volition Systems, 
which produced compilers for sever- 
al computers including the Apple II, 
IBM PC, and Sage. Several textbooks 
have been based on Volition Systems’ 
compiler and library, including 
those by Gleaves, Wiener and Sinco- 
vec, Wiener and Ford, and Knepley 
and Platt. Finally, the Modula User’s 
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Society (MODUS) has been working on 
what it hopes will be a universal li- 
brary. | 


Porting Among Systems 

By and large, the compilers them- 
selves are pretty much compatible 
(despite the amendments mentioned 
above). Virtually all microcomputer 


implementations use 16 bits for CAR- 


DINAL, INTEGER, and BITSET data 
types; most implement strings as 
NULL terminated ARRAY OF CHAR. (In- 
terface Technologies’ is the only 
product I know of that implements 
strings Pascal-style—presenting a se- 
rious impediment to portability.) All 
the standard data types, structures, 
loop constructs, and operators are in- 
variably provided. Some compilers 


omit or alter the low-level facilities 


for concurrent processing, but most 
programmers will have limited use 
for these advanced features. 

Differences in the library, particu- 
larly in file handling, are where 
most of the problems lie. The four 
systems I am familiar with (those 
from Hochstrasser, Volition Systems, 
Interface Technologies, and Logi- 
Tech) have three significantly differ- 
ent approaches to files. Hoch- 
strasser’s and Volition Systems are 
essentially similar and follow the 
earlier (PDP-11) work at ETH; Logi- 
Tech’s follows that for the Lilith 
quite closely; whereas Interface 
Technologies’ seems to go its own 
way. On the plus side, all implemen- 
tations provide the high-level I/O 
modules suggested by Wirth (Termi- 
nal and InOut) as well as the the float- 
ing-point library (MathLib0). Most 
provide essentially similar conver- 
sion libraries for changing strings to 
numbers and vice versa. 


it is involved with creating the sym- 
bol table. It does nothing (returns im- 
mediately) if there is no opcode. The 
cascaded IF ELSIF ELSE statement de- 
termines, first, if any assembler di- 
rective is present, and if so, specifies 
the amount of memory reserved 
(that will vary—EQU reserves no 
memory, whereas DS may reserve 
any amount). Next, if there is any la- 





Porting X68000 from Hoch- 
strasser (CP/M) fo Logifeck 
(4S DOS) 


Hochstrasser ‘supplies: several file- 
handling modules with its compiler. I 
chose to use the one called Files be- 
cause I knew it to be nearly identical 


to a module of the same name sup- 
plied by Volition Systems. The Files 
module is flexible and powerful in 
that it allows random or sequential 
access; it also provides methods to 
read or write complete data struc- 
tures. LogiTech supplies one file-han- 
dling module—FileSystem, which is 
capable of all the same operations as 
is Files, along with text-oriented 
streams (supplied as a separate mod- 
ule called Texts in the Hochstrasser 
and Volition Systems libraries). 

The first (and easiest) step in porting 
to a new compiler is to change the 
names of the various procedures to 
match the new library. In this in- 
stance, for example, Read became 
ReadChar, whereas WriteRec (f, Re- 
cord Variable) had to be converted to 
WriteNBytes (f, ADR (RecordVari- 
able), TSIZE (RecordVariable), Writ- 
ten). All these kinds of changes are ob- 
vious from reading through the 
documentation of the compiler sys- 
tems, and they present few problems. 

Several of the necessary changes 
are not so obvious. Both systems sup- 
ply a Create procedure, which (as the 
name suggests) is for creating a new 
file. LogiTech’s system, however, cre- 
ates only a temporary file, which dis- 
appears as soon as the file is closed. To 
open an existing file, Hochstrasser 
supplies the procedure Open and Lo- 
gilech supplies Lookup. Lookup is a 
general-purpose procedure that, de- 
pending on a BOOLEAN parameter, 
will either open an existing file or cre- 
ate a new one. Because the assembler 
must often create a new version of an 
existing object file, I found it neces- 
sary to call Delete before using Look- 
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bel present (whether there was an 
assembler directive or not), an entry 
is made in the symbol table. That en- 
try will consist of the current value 
of the address counter except in the 


case of the EQU assembler directive. 
Notice that an error due to a full 
symbol table will be detected here— 
this is a fatal error and will cause the 
assembler to abort. You must then 


split up your program into two or 
more modules. If there was no as- 
sembler directive (pseudo-op), Get- 
Operand and GetInstModeSize (pro- 
cedures from the SyntaxAnalyzer 
module) help to determine the size of 
the operands. The special QUICK 
mode instructions must be taken into 
account before determining how far 
the address is going to have to be ad- 


vanced by this instruction. 

During pass 2, GetObjectCode first 
checks if there is any opcode, and it 
returns without doing anything if 
there is none. After making note of 
the size extension of the opcode, con- 
trol is passed to ObjDir, which han- 
dles code generation for assembler 
directives (see detailed description lat- 
er). Phase errors are checked by com- 





_up to create a new file. 
_ The Hochstrasser Files module im- 
_plements the type FILE as an opaque 
_ (hidden) type (that is, as a pointer to 
some structure defined in the imple- 
mentation module). The opaque type 
FILE allows the programmer to use 
files with no knowledge of their un- 
derlying structure. LogiTech’s sys- 
_ tem, taking the same approach as that 
_ for the Lilith, implements type FILE as 
a record that is specified in the defini- 
tion module. This forces the program- 
mer to know the intimate details of 
the file structure and also has one 
_very (for me at least) unexpected and 
disturbing consequence: The type 
FILE must always be passed as a VAR 
parameter. If it is passed as an ordi- 
nary value parameter (as can be done 
with the opaque pointer type), the 
- calling program is unable to get infor- 
-mation back to the FileSystem mod- 
_ule, resulting in rather odd run-time 
errors. It took quite a bit of head 
scratching to puzzle that one out. 
With all the changes in place, the file 
systems on the two versions of X68000 
produce outwardly identical results. 
LogiTech’s compiler passes all com- 
mand-line parameters to the first 
ReadString call in the main program, 
which obviates the need for my 
CmdLin2 procedure. From the user’s 
perspective, the effect created is 
essentially similar: The assembly 
file name can be entered either as the 
program is invoked or in response to 
a prompt once the program has start- 
ed. 

The number conversion routines 
supplied by the two compilers differ 
both in name and in behavior. In one 

case (CARDINAL to STRING), I had to 
add an extra parameter (specifying 
length), whereas in another (STRING 
to CARDINAL), the behavior of the 
- equivalent LogiTech procedure was 
sufficiently different that I had to 
write a new conversion routine. 
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Other Factors Not Related to 
Portability 

At the college where I work, one of 
my colleagues has dubbed the IBM PC 
“Miss Piggy’ for its propensity to 
gobble up memory. It seems that 
with every application you care to 
name, the PC requires much more 
memory than does any other com- 
puter. Compilers are no different in 
this regard. 

The original work on X68000 was 
done on a standard CP/M system with 
64K of memory and two 1.2-mega- 
byte floppy-disk drives. When I start- 


ed work on the port to the MS DOS 


environment, I tried using a standard 
IBM PC with 256K of memory and 
two 360K floppy-disk drives. I soon 
found that the standard PC was not 
up to the task. 

Upon moving to a machine 
equipped with a 20-megabyte hard- 
disk drive, I was able to start compil- 
ing, and all but two of the modules 
would compile. On the InitOpera- 
tionCodes module, the compiler 
aborted with an ‘out of memory’ er- 
ror. This was the program module 
that initialized the mnemonic lookup 
table, and then wrote it to a file—it 
was impractical to split it into several 
modules. The only solution was to 
expand the memory to 512K. Even 
with the extra memory, however, an 
implementation restriction still pre- 
vented several of the procedures 
from compiling because they were 
too long. Remember, this is the same 
code that compiled without a whim- 
per on a 64K CP/M system. Eventually 
I had to split the InitOperationCodes 
main program into four procedures 
and also split the MergeModes proce- 
dure (from the CodeGenerator mod- 
ule) into four. Despite the length of 
these procedures, splitting them 
made no sense from the point of 
view of program logic. 

The Hochstrasser compiler does no 






error checking at run time, whereas 
LogiTech’s checks for integer/cardi-— 
nal overflow, array range errors, 
CASE out of range, and so on. It seems 
that all the type transfers used in 
X68000 cause some range errors be- | 
cause, before I could get the program 
to work, all the error checking had to 
be turned off. This is easily done 
with the LogiTech compiler (via 
compile-time option switches), and it - 
causes no problem whatever to the - 
accuracy or internal ‘error oe 
done by X68000. _ : 
Just out of publosity, 1 timed the 
compilers on several large modules. 
Both compilers use four passes, 
which are overlayed from the disk. 
The Hochstrasser linker produces an - 
executable file directly, whereas Lo- 
giTech’s requires an additional step 
for this. Even with the hard disk and 
512K installed on the IBM PC, the Logi- — 
Tech compiler was only about 20 
percent faster than was the iB loch- : 
strasser Sas  . 











The Verdict 


the LogiTech compiler was a ic 
tively painless and quick process. 
The total time expended was rough- 
ly 15 hours—much of which was 

spent getting used to a new compiler. | 
If you are already familiar with your 
compiler, you should have little trou- 
ble making the conversion in a single 
afternoon. 

True to form, the © compiled cone 
is 47 percent larger on ‘Miss Piggy” 
than it is on the CP/M system. Execu- 
tion speed (of X68000) is essentially 
the same on tie * and Ms DOS ver- 
sions. _ 
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68K ASSEMBLER 
(continued from page 49) 


paring the pass 1 address count (from 
the symbol table) with the pass 2 ad- 
dress count for any line that has a la- 
bel. The two instruction types that 
use relative addressing modes are 
handled as a special case because of 
the odd requirements placed on 
them. (There is no automatic selection 
of the most efficient branch length. 
The assembler assumes the worst 
case and produces long branches un- 
less explicitly told to use the short 


50 


Circle no. 159 on reader service card. 


form. Full range checking is done for 
either long or short branches, howev- 
er.) Object code for the balance of the 
instructions is produced in Merge- 
Modes (described next). 

Although the 68000 instruction set 
is very orthogonal (regular), there are 
a few instructions that have to be 
handled as special cases. That is the 
purpose of the CONST definitions at 
the top of the module: they are BIT- 
SET constants representing several 
operation codes. These are used 
within the MergeModes procedure 
to take care of the special cases be- 








fore the more common addressing 
modes are handled. | 

MergeModes is not exported from 
the definition module of CodeGenera- 
tor but is used by the GetObjectCode 
procedure to combine information 
from several sources to produce the 
hexadecimal machine code. Merge- 
Modes is at the heart of the code gen- 
eration process. Many 68000 instruc- 
tions use a format that is some 
variation on ADD Dn,<ea>. The ef- 
fective address <ea> may be any of 
12 addressing modes, although few 
instructions use all 12 modes. There 
are four basic groupings of these 
modes—Data, Memory, Control, and 
Alterable—which may be combined 
in various ways. The local procedures 
EffAdr and OperExt determine the 
bit patterns needed for the effective 
addressing mode being used along 
with any operand extension needed: 
for that addressing mode. (For exam- 
ple, MOVE D3,600(A2) requires that bit 
patterns of 000011 and 101010 be in- 
serted into the opcode for the source 
and destination operands, and an ex- 
tension word of 0000001001011000 
needs to be tagged on after the op- 
code for the 600 offset.) 

The bulk of MergeModes cross- 
checks the addressing mode found 
by GetOperand with the modes that 
are allowed for the current instruc- 
tion (information from OPCODE.DAT 
and the OperationCodes module). 
Any errors are passed onto the Er- 
rorX68 module, where verbal error 
messages are displayed on the con- 
sole. If no errors are detected, vari- 
ous bits and pieces of information are 
combined to produce the machine 
code for the instruction. 

An example will illustrate typical 
operation for the complete sequence 
needed for code generation. This 
comprises two steps: first converting 
the source code to an intermediate 
language consisting of sets, enumera- 
tions, and various integral values; 
and then combining the elements of 
this intermediate language into Mo- 
torola 68000 machine language. 


ADD (A2),D6 ;Add the data word 
addressed by A2 
;to data register D6 


When the Parser module is finished 


with this instruction, you are left 
with three character strings: ADD, 
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68K ASSEMBLER 
(continued from page 50) 


(A2), and D6. Parser passes ADD to 
OperationCodes, which returns three 
sets: {15, 14, 12} —> 1101 0000 0000 
0000, ModeA{OpM68sD}, and Mode- 
B{EA05y}. The first set is the raw bit 
pattern for this instruction—that is, 
the bit pattern without operand-size 
bits and operand addressing-mode 
bits added. The other two sets specify 
the addressing modes that the ADD in- 
struction can use and are designations 
internal and unique to X68000. 

The Parser passes (A2) and D6 to the 
GetOperand procedure in SyntaxAn- 
alyzer (through CodeGenerator), 
where they are analyzed. A record 
of type OpConfig, which contains the 
mode, value, size, and various other 
information, is provided for each op- 
erand. In this example, those records 
would contain the following data: 


Mode ---> ARInd 
register indirect 
Value ---> none 
Loc ---> location on source line 
Rn ---> 2 
Xn ---> none 
Xsize ---> none 
Xtype ---> none 
D6 Mode---> DReg _ ;data register 
Value ---> none 
Loc ---> location on source line 
Rn ---> 6 
Xn ---> none 
Xsize ---> none 
Xtype ---> none 


(A2) 


MergeModes will take all pertinent 
information from the above to pro- 
duce the machine code or, if there 
are inconsistencies, produce error 
messages. 

An IF statement checks for each of 
the possible addressing modes. For 
example, the IF OpM68D IN AddrMo- 
deA statement would be used for the 
ADD (A2),D6 instruction because ADD 
resulted in ModeA{OpM68D} being 
returned from OperationCodes. The 
Dest.Mode is checked to see that it is 
DReg (it is), so the Dest.Rn (6) is shifted 
left by 9 and ORed with Op. Because 
shift left is not provided in Modula-2, 
I used multiplication to accomplish 
the same thing (multiplication by 2 is 
the same as shift left 1). Because of a 
principle called strength reduction, 
this multiplication (by a power of 2) is 
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not nearly as inefficient as you might 
think. As part of this same IF state- 
ment, the size bits are ORed into place 
depending on the size suffix placed 
on the instruction. 

Because there is no size suffix on 
ADD (A2),D6, size WORD is assumed. 
The IF EA05y IN AddrModeB will fill 
out the operation with more error 
checking and a call to the EffAdr lo- 
cal procedure mentioned above. This 
procedure checks that the mode 
used is consistent with the instruc- 
tion, then uses bitwise AND/OR to ap- 
pend the correct bits. OperExt would 
have nothing to do on this instruction 
because neither ARInd or DReg re- 
quire an operand extension. 

All instructions follow a similar 
format: source line ---> line parts (la- 
bel, opcode, operands) ---> interme- 
diate language (bitsets, enumera- 
tions, and so on) ---> machine code. 
Any or all of the processes involved 
in reaching these states can result in 
error messages if the source line does 
not conform to correct 68000 syntax. 

The hidden procedure ObjDir is 
the assembler directive equivalent to 
MergeModes—it produces the code 
for the directives. It is essentially sim- 
ilar to the cascaded IF ELSIF ELSE 
statement that handles pseudo-ops in 
the BuildSymTable routine except 
that it has to generate the code, 
which means determining values 
and setting object code lengths. This 
procedure also handles ASCII strings. 
I’m not at all satisfied with this sec- 
tion of code, and if you think it looks 
like an afterthought, you're right! 
The awkwardness results from hav- 
ing to pass the string (which is con- 
verted to LONG) to the output mod- 
ules as a 2-byte opcode and two 
4-byte operands. The other alterna- 
tive was a major rewrite, which will 
have to wait until Version 2 (when I 
will have to rewrite some of the code 
to accommodate a linker, anyway). 


SyntaxAnalyzer 
The procedures within SyntaxAna- 
lyzer (Listing Eighteen, next month) 
are not visible to any other module 
except CodeGenerator (it was origi- 
nally part of the same module). Its 
purpose is mainly to analyze the 
operands of the instructions and to 
determine their value and their 
mode. 

CalcValue and GetValue work to- 


gether, as their names suggest, to de- 
termine the value of any operands 
that have a value. These include deci- 
mal numbers (0— 65535); hexadecimal 
numbers (0—$FFFFFFFF); single 
quoted ASCII literals; the symbol for 
the current value of the program 
counter (*); and identifiers, which 
may represent any value. GetValue 
contains a simple left-to-right expres- 
sion evaluation loop that recognizes 
only addition and subtraction opera- 
tions. It hardly has the elegance of a 
recursive descent expression parser, 
but it is simple and compact. Get Value 
uses the LOOP... END construct with 
three conditional EXIT statements. Al- 
though this could have been done 
with a REPEAT loop, the termination 
condition would have been awk- 
ward, with six terms, three ANDs, and 
three ORs. I rest my case! 

Two procedures, called GetSize 
and GetAbsSize, determine the size 
of operands (BYTE, WORD, or LONG) 
by looking for a suffix of .B, .W, or .L. 
If no suffix is present, size WORD is 
assumed, as required by the Motor- 
ola syntax. The GetAbsSize proce- 
dure actually creates a slightly non- 
standard syntax for this assembler. 
Most 68000 assemblers will automati- 
cally choose the WORD absolute ad- 
dressing mode for addresses in the 
ranges of 8000—0 and 0—$7FFF and 
LONG absolute addressing for higher 
addresses. X68000 will always use 
full 32-bit addressing unless specifi- 
cally instructed to do otherwise. The 
nonstandard syntax is MOVE 
DO,$6000.W. 

The GetInstModeSize uses a CASE 
statement to return the size of the ob- 
ject code, both in terms of address 
count and in terms of number of 
hexadecimal digits required. 

GetOperand is the workhorse of 
SyntaxAnalyzer, as it is responsible 
for performing lexical analysis on 
the rather complex and varied oper- 
ands used in 68000 assembly lan- 
guage. Not much elegance here—this 
routine simply looks for all the possi- 
ble addressing modes. When it finds 
a good one, it returns all necessary 
information in the form of the re- 
cord described above under Code- 
Generator. If GetOperand finds an 
impossible addressing mode or an 
out of range register number, it uses 
ErrorX68 to report the error to the 
user console. 
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GetMultReg is a routine that sorts 
out the MOVEM instructions. This in- 
struction is like a multiple PUSH or 
multiple PULL operation. MOVEM DOo- 
D7/A0-A6,-(SP), for example, will 
push all 68000 address and data regis- 
ters onto the stack with one instruc- 
tion. This is accomplished by a mask 
that follows the actual instruction, 
where each bit in the mask repre- 
sents a register; if the bit is set, that 
register gets moved. The job of Get- 
MultReg is to produce that mask from 
the register list. The — indicates a 
range: DO— D7 means all registers be- 
tween DO and D7 inclusive, and the / 
is just a separator. My strategy was to 
use a flag and an enumeration type 
along with nested IFs to keep track of 
what state the calculations were in. 
That made it easy to detect errors be- 
cause it would cause a transition to 
an illegal state. Just to complicate 
matters, the mask has to be inverted 
in certain cases. That function is tak- 
en care of by a conditional subtrac- 
tion as the mask is constructed. 


Listing 

The Listing module (Listing Nineteen, 
next month) creates the formatted 
program listing with object code and 
source code together in the usual for- 
mat. The StartListing procedure does 
nothing but print a heading and ini- 
tialize the page count and line count 
variables. WriteListLine does what its 
name implies—writes one line of list- 
ing to the file. Unused object code 
fields will be skipped automatically 
(no address is entered in the case of 
an EQU pseudo-op, for example). The 
LongPut routine from LongNumbers 
is used to write all object code (in 
hexadecimal) to the file. 

Modula-2 file libraries do not usu- 
ally contain any way to write a string 
to a file (InOut and Texts allow this, 
but that’s another story), so I had to 
write a small procedure to do that. 
The WriteStrF outputs any string toa 
file and is used throughout Listing. 

The WriteSymTab procedure uses 
information imported from the Sym- 
bolTable module via ListSymTab to 
output a symbolic reference table at 
the end of the listing. ListsymTab 
will return the nth entry in the sym- 
bol table each time it is called. Both 
WriteListLine and WriteSymTab 
make use of a procedure called 
CheckPage to form-feed to the next 
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68K ASSEMBLER 
(continued from page 53) 


page and print a new page number. 
The listing file created by this mod- 
ule may be dumped to a standard 
printer with the PIP command. 


Srecord 

Creation of S-record files (Listing 
Twenty, next month) is a bit more 
complicated than creation of listing 
files. Count and checksum bytes 
must be calculated, and it is usual to 
split the source code into equal- 


length records unrelated to the 
length of the 68000 instructions (that 
is, some instructions may be split 
with half on one line of the file and 
the rest on the next line). 

My strategy in this was to accumu- 
late source code until there was 
enough to output a 16-byte record, 
output that record (saving any extra 
bytes accumulated for the next re- 
cord), then go back to accumulating 
more. This necessitated two storage 
arrays and two indexes for accessing 
them: Sdata/Sindex and Xdata/Xin- 
dex. Another complication is that re- 


C Programmers: If you do business 
application development, you need 


FAST 
PROGRAMMING | 


The C programming language tool for 
business applications. 


Why Fast Programming? 


Because it is a complete development 
system. You will no longer need to 
integrate incompatible libraries and 
fragments of programs. 


Because finished, ready-to-compile C 
programs are generated. 


Because there are no run time 
royalties. Not even for the utilities. 


Because the resulting system is truly 
multiuser. 


Fast Programming is $995 for a site 
license. VISA, MC, AMEX accepted. 
Currently available versions include 
PC-DOS, XENIX and UNIX. Call for 
specific machine availability. 


Subject, Wills 
& Company 


800 Enterprise Drive 
Oak Brook, Illinois GO521 
(312) 789-0240 
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The components of 
Fast Programming are: 


C ROUTINES 
Decimal math, keyin and display 
with windowing, extended string 
handling, time/date conversions, 
time/date edits, misc edits, sequential 
I/O, key sequential I/O, random I/O, 
indexed I/O, printer output, error 
handler, system interface routines 
and more. 


C PROGRAM GENERATOR 
Maintenance and data entry program 
generator, report program generator, 
processing program generator, I/O 
routines generator. The generators 
provide many user exits in the 
generated source code. This allows 
for custom coding without changing 
the generated C source program. 
This means that no custom coding is 
lost when programs are regenerated. 


RUN TIME UTILITIES 
SORT, INDEX, REFORMAT, BUILD, 
CREATE, DUMP, CHAIN, ENCODE, 
FILECHK, LIST, RENAME, COPY and 
DELE Tix 


MENU SYSTEM 





cords should start on boundaries di- 
visible by 16 whenever possible. Only 
three procedures are exported from 
the definition module of Srecord: 
StartSrec, WriteSrecLine, and End- 
Srec. Several other procedures that 
are hidden within the implementa- 
tion module do much of the work. 

StartSrec creates the SO (header) re- 
cord. This record consists mainly of 
the source file name as ASCII charac- 
ters represented in hexadecimal for- 
mat. However, all S-records must 
have an address (this is always 0 for 
the header record), a byte count, and 
a checksum. The byte count includes 
a count for the address and the 
checksum; the checksum is the com- 
plement of the 1-byte residual of the 
sum of the address, count, and data. 

The WriteSrecLine procedure re- 
turns immediately if there is no ad- 
dress to write out (this occurs on 
blank source lines or for EQOU state- 
ments only). Next, Xdata is trans- 
ferred to Sdata if there was anything 
left over from the previous call to 
WriteSrecLine. If for any reason the 
address count passed into WriteSre- 
cLine is different from the internal 
count, any existing data is output asa 
complete S-record, and a new record 
is started. This would occur any time 
a new ORG statement is encountered 
in the source code. Finally, each of 
the ObjOp, ObjSrc, and ObjDest (ob- 
ject code for opcode, source, and des- 
tination, respectively) are appended 
to Sdata. If Sdata now contains more 
than 16 bytes, the record is written 
out to the file (this is detected by Ap- 
pendData, returning FALSE). Any ex- 
cess object bytes are retained in 
Xdata. 

The information in Sdata and 
Xdata is retained between calls to 
WriteSrecLine because these vari- 
ables are declared within the module 
(not within a procedure). These vari- 
ables cannot be seen outside the Sre- 
cord module (local visibility) but re- 
main in existence throughout the 
lifetime of the program (global exis- 
tence). In Pascal, lifetime and visibili- 
ty are tied together: If a variable ex- 
ists, it is visible; if it is not visible, it no 
longer exists. That prevents local 
variables in Pascal from retaining 
values between calls—a very useful 
feature, as illustrated here. 

The EndSrec procedure outputs 
any data left over from the final call 
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to WriteSrecLine and then outputs a 
fixed S8 trailer record. 

Actually, this even-boundary and 
consistent-length business is not re- 
quired by the S-record format be- 
cause each S-record is totally autono- 
mous in that it begins with both its 
own starting address and a byte 
count. It is traditional for Motorola S- 
records to be formatted as described 
above, however. 


ErrorX68 

Most error handling (except that in- 
volving files) is done by the ErrorX68 
module (Listing Twenty-One, next 
month). This module defines an enu- 
meration type that provides 12 
named error types. The procedure 
Error outputs the line count (source 
line where the error was found), the 
source line itself, an arrow pointing 
to the error, and a verbal error mes- 
sage. The program is then suspended 
until the operator acknowledges the 
error by pressing any key on the con- 
sole keyboard. If greater than 500 er- 
rors occur, the program is terminat- 
ed with an appropriate message. 
After pass 2 is completed, WriteEr- 
rorCount outputs an END OF ASSEM- 
BLY message to both the console and 
the listing file. 


Compiling X68000 

Because many of the modules within 
X68000 interact in complicated ways, 
the order of compilation is critical. 
Specifically, if ModuleA imports ob- 
jects defined in ModuleB, it is clear 
that ModuleB must be compiled first. 
In all cases, a definition module must 
be compiled before its implementa- 
tion module can be compiled; how- 


Compilation Order for X68000 


. CmdLin2.DEF, CmdLin2.MOD 
. LongNumbers.DEF, LongNumbers.MOD 
. Parset.DEF 
. CodeGenerator.DEF 
>. SyntaxAnalyzer.DEF 
. SymbolTable.DEF, SymbolTable.MOD 
. OperationCodes.DEF, OperationCodes. 


MOD 
. Listing.DEF, Listing. MOD 
3. Srecord.DEF, Srecord.MOD 
. ErrorX68.DEF, ErrorxX68.MOD 
1. Parser.MOD 
2. SyntaxAnalyzer.MOD 
13 CodeGenerator.MOD 
14. X68000.MOD 





Table 1 
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ON hie = ba 
DON’T ASK HOW OURS CAN BE SO FAST... 
ASK WHY THEIRS ARE SO SLOW! 


“.. a breath of fresh air. .” 
Computer Language, Feb. 85 


THE BEST Z80 
ASSEMBLER ON 
eS (eel 


GOT BETTER! 





Now fully compatible with M80 

in .2Z80 mode with many exten- 

sions. Time & date in listing, 16 

char. externals, plus many other 
features. | 


« . in two words, I’d say speed & 
flexibility”, 
Edward Joyce, User’s Guide #15 


NORMALIZED PERFORMANCE To order, or to find out more 
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“Multiple windows:’ 


“Emacs runs on 
MS-DOS, VMS 
and UNIX. It’s my 
company’s standard 

editor.” 





“Icanruna shell or DCL 
command session even 
while editing:’ 





“A hundred times better 
than the UNIX vi editor.’ 


No Two Users Can Agree On Why 





“Programming modes 
to assist me in writing C, 
Pascal, ADA and Lisp.’ 





“UniPress really 
supports Emacs on 
Berkeley and AT&T UNIX, 
and is constantly 
developing Emacs.’ 





“| can associate any 
command to any 
keystroke sequence: 





“Emacs automates the 
code-compile-edit- 
debug process.’ 





UNIPRESS EMACS" 
Is The Only Choice. 


That's right. No two users can agree on why they’ve 
chosen UniPress Emacs. UniPress Emacs provides so 
much for creating and modifying programs, documents 
and other text files. No other program has such power- 
ful facilities. And we offer Emacs for UNIX™ Xenix™ 
Ultrix™ MS-DOS™ and VMS™ systems. 


UniPress Emacs gives you all the basic text editing 
commands, and goes much further. It allows multiple 
windows to display several files or portions of the same 
file simultaneously, a program’s output, a shell/DCL 
window, a help window, an error listing, an electronic 
mail message, or anything else! 


UniPress Emacs simplifies programming with its C, 
Pascal, ADA and Lisp modes. It checks for balanced 
parentheses and braces, and indents and reformats 
code as needed. “C mode” produces templates of con- 
trol flow in user-definable styles. After compiling, 
Emacs collects any compiler error output in a window. 
Emacs then analyzes this error output and automat- 
ically displays the erroneous source lines, one-by-one. 


In addition, Emacs offers great extensibility through 
macros and the built-in compiled MLisp™ program- 
ming language. The MLisp language provides looping, 
conditional testing and other flow control statements, 
and a rich set of logic, arithmetic and string operations 
which can be combined. 
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call us at 800-222-0550 (Outside NJ) to find out about 
our dial-in demo machine or send in the coupon to 
get more product information. We’ll send you our free 
catalog with information about Emacs and our other 
software products. 


UniPress Software, Inc., 2025 Lincoln Highway, Edison, 
NJ 08817. Telephone: 201-985-8000. Order Desk: 
800- 222-0550 (Outside NJ). Telex: 709418 


European Distributor: Modulator SA, Switzerland. 
Telephone: 41 3159 22 22. Telex: 911859 


Japanese Distributor: D.1.T. Inc., Minato-Ku, Tokyo. 
Telephone: 03 586-6580 
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Your Leading Source for UNIX Software 
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Discover Why UniPress Emacs is 
the Only Choice in Text Editors! 
State___ Zip | 
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Company: 
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Phone: 
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“Electronic mail is only 
one of the many includec 
packages | use.’ 


“| can create my 
own customized editor 
commands with 
the MLisp extension 
language.’ 


68K ASSEMBLER 
(continued from page 55) 


ever, it goes further than that. The 
definition module of Parser, for ex- 
ample, defines two types (TOKEN and 
OPERAND) that are used in Symbol!Ta- 
ble, CodeGenerator, SyntaxAnalyzer, 
and others. Therefore, Parser.DEF 
must be compiled before any module 
that depends on it. If the correct or- 
der is not followed, the compiler will 
produce ‘“‘undefined identifier’ er- 
rors. Many similar situations exist in 
any nontrivial Modula-2 program. 
The compilation order shown in 
Table 1, page 55, avoids any prob- 
lems but is not the only possible or- 
dering arrangement. (A harmless cir- 
cular reference exists between 
Parser and ErrorX68 because each 
imports objects from the other. This 
only affects the order of execution of 
their respective initialization parts 
and causes no problems of any sort.) 


Modula-2 Design Strategy 
The implementation module often 
hides details not apparent in the defi- 
nition module. Obviously, the algo- 
rithm is encapsulated inside the im- 
plementation module, but it goes 
further than that. Constants, types, 
variables, and procedures that are 
not visible from the definition mod- 
ule may contribute an important 
part to the module's function. (For 
example, the GetDigit, IsHEX, and 
GetHEX routines from LongNumbers 
as well as the LineParts procedure 
from Parser are unknown to the def- 
inition modules, and hence they 
need not be known by any program- 
mer using these modules.) 
Additionally, the module initializa- 
tion may play an important role in 
the structure of the program, as in the 
SymbolTable module when SymTab 
is cleared and the indexes for access 
to the table are set to their starting 
points or as in OperationCodes where 
data is brought in from a file. Finally, 
modules may be used to control visi- 
bility and lifetime fully: Nothing is vis- 
ible outside a module unless it is ex- 
ported, but variables belonging to 
library modules exist throughout the 
life of the program. These features al- 
low large programming projects to be 
constructed of modules of only a few 
closely related procedures. Debug- 
ging is easier, and maintenance is 
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finally possible! 


Conclusion 

Although X68000 is a fully functional 
program, I do not consider it a com- 
pleted project as several areas could 
use improvement. Expression and 
string evaluation should both be im- 
proved. The first steps would be to ex- 
pand and improve LongNumbers to 
include multiplication and division 
and to improve efficiency. This can 
wait until Modula-2 compilers con- 
form to the new standard and add 
long integer and cardinal data types. 
Constant strings should be expanded 
to at least 80 characters per line. That 
is harder than it sounds because of 
the way parameters are passed to the 
Listing and Srecord modules. 

Finally, there is the matter of a 
linker. To adapt the assembler to pro- 
vide relocation information will re- 
quire some rewriting of existing code 
and some new code; however, many 
of the modules could be reused al- 
most intact. Then there is the Linker 


F2AB TRASH_IT: REPNZ STOSW 


| firstblank = tabentr ; 
while (tabcntr > tabcol) 
( tabentr++ ; 
S>c = getc(fpin) ; 
ic =S= *(et= =" &6e== EOF) ) > 


else 


if (tabentr == tabcol) goto getout ; 


‘‘CodeSmith really shines...’’ —PC TECH JOURNAL 
“It has greatly speeded up the development of new programs and 
the maintenance of existing programs.’’ —MicroPro Int'l Corp. 


‘* .has saved us uncountable hours in debugging 

communications software.’’ —Dave Adkins, Jim Dukat, Los Altos CA 
‘*...has almost all the features that are in the Hewlett-Packard 
64000 emulator I use at work.’’ —Joel Lagerquist, Riverside CA 


‘‘CodeSmith-86...a superb utility.’’ —Steven Kang, New York NY 


VISUAL AGE ee In Calif. (213) 534-4202 
642 N. Larchmont Blvd. * Los Angeles, CA 90004 


itself—not a trivial task either. If any 
readers have further suggestions on 
how X68000 can be improved, please 
pass them along to me. Better yet, 
make the changes yourself and hand 
the program back into the public do- 
main in improved form. 


Availability 
The following is available directly 
from the author for $20 (U:S.): 

1. A 25-page X68000 User’s Manual 
that includes operating instructions 
for the program as well as a descrip- 
tion and example of a method to use 
the assembler to link several modules. 

2. An 8-inch CP/M SSSD disk or a 514- 
inch IBM PC disk with executable pro- 
gram as well as complete source 
code and several 68000 assembly-lan- 
guage examples. 


DDJ 
(Listings begin on page 80.) 


Vote for your favorite feature/article. 
Circle Reader Service No. 6. 
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ARTICLES 


The Cryptographer’s 


oe , by Fred A. Scacchitti 
he “Infinite Key Encryption . a. 


: P aucibin’ article in the August | 
1984 issue of DDJ contains an | 


excellent tutorial on encryption sys- | 
tems. At the time it was published, I 


read it with only passing interest, but | _ 
about six months ago, I developed a | 

need for this type of utility and so be- | 
gins my story. The first thing I did | | 
was write a shell cypher program | 
(cypher.c—Listing One, page 94). Be- | 


Toolbox 





‘The strongest cypher 
-_ schemes use a 
combination of. 
seis ee tion and 
_ Substitution. a 


cause J had already written a generic Lc _ 


file copy utility that allowed modifi- | — 


cations during transfer, it was asim- | _ 





ple matter to modify the argument | __ 


passing to include multiple keys and 
add a cypher( ) function call to en- 
crypt the file with a simple exclu- 
sive-ORing algorithm (cypher1.c— 
Listing Two, page 94). Although this 
method did encrypt the file and al- 
lowed for easy decryption (using the 
same run string), there were definite 
detectable patterns in the resultant 
file. These patterns, a function of the 
key period, were easily found in ar- 
eas of repetitive characters (for ex- 
ample, a string of asterisks or spaces). 
Another drawback to this scheme 
was the inability to pass nonprinta- 
ble characters in the run string, 
thereby limiting the number of en- 
cryption tokens. So, it was back to the 
drawing board. 

Rereading the aforementioned ar- 
ticle with renewed interest, I gained 
an insight into the methods and 
schemes of practical modern cy- 
phers. I don’t intend to cover these 
concepts, so if you're interested avail 
yourself of that article and those in 
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its bibliography. 

Although the article’s tutorial por- 
tion was excellent, I disagreed with a 
few points on implementation. First, 
there was the code itself and the inti- 
mation that assembly language was 
required for reasonable speed. The 
MAC Assembler is used only with CP/ 
M-80, and I wanted more portable 
source, so I decided to write it in C. 
Second, I felt that a random key of 
some prime length could be generat- 
ed solely from the original key (cy- 
pher2.c—Listing Three, page 95). Al- 
though some keys may work better 
than others, a means to evaluate re- 
sults can render this method func- 
tional. And last, I disagreed with the 
need for passing information in the 
encrypted file. It seemed unneces- 
sary and cumbersome. My goal was 
to develop a method that worked en- 
tirely from the run string. Overall, 
though, I must commend the work 
done by John Thomas and Joan 
Thersites for presenting such a com- 
plete treatment of their topic. 


The Ultimate Cypher 
The ultimate cypher is like the ulti- 


mate weapon—no matter how so- 
phisticated, an antiweapon (anti- 
cypher) can be developed eventually 
if there is a need. The user must 
make some judgments regarding 
needs and level of protection. The 
two algorithms mentioned above are 
relatively simple to implement and 
use. The same keys can encypher or 
decypher the file, and key order isn’t 
important. 

The experts (and it becomes quite 
obvious) point out that the strongest 
cypher schemes utilize a combina- 
tion of transposition and substitution. 
When transposition is added howev- 
er, the order of decyphering must be 
the exact reverse of encyphering. 
The last cypher module contains an 
algorithm for transposing the file to- 
kens along with the random generat- 
ed key encryption scheme (cy- 
pher3.c—Listing Four, page 95). This 
is a small price to pay for the added 
security. 


The Need for Tools 

As I progressed in my quest for the 
ultimate cypher/decypher algo- 
rithm, I became aware of the defi- 
ciencies of the standard CP/M utili- 
ties at my disposal, so I developed my 
own. 

The first tool, fv.c (Listing Five, 
page 97), replaced my CP/M dump- 
.com. Dump provides a continual on- 
screen display of the hex contents of 
a file. Because most encryption is 
performed on text files, it is benefi- 
cial to include the ASCII form along 
with the hex. And, because most al- 
gorithms use an exclusive-OR as the 
means of encryption, it is easy 
enough to dump two files and the ex- 
clusive-ORed difference between 
them. 
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The next tool, fstat.c (Listing Six, 
page 98) calculates and displays the 
statistical characteristics of the file. 
This tool scans the file, counting the 
occurrences of each element, and 
provides a 16 X 16 display of the dis- 
tribution of characters. It calculates 
mean, median, mode, and range of 
the character distribution and dis- 
plays its histogram. As you might sus- 
pect, each file type has a definite sig- 
nature. In fact, after limited use of 
this utility, you will be able to recog- 
nize the histogram patterns for text, 
WordsStar, and many other files. 

While experimenting with various 
schemes, it became obvious that the 
most difficult file to disguise was one 
that contained a single byte for every 
entry or some sequential scheme. So, 
the next task was developing a utili- 
ty, makef.c (Listing Seven, page 100), 
to generate a known sequential or 
unicharacter file of some user-de- 
fined length. 

Finally, the last utility, sp.c (Listing 
Eight, page 100), was a search scheme 
I needed to look for repetitive pat- 
terns occurring within a file and to 
provide some information regarding 
location and depth of the repetition. 
It also includes the option to calculate 
the delta characteristics of a file to 
search for repetitive mathematical as 
well as character sequences. 




























Cypher.c—Listing One 
The cypher shell program is provid- 
ed for use ‘‘as is’ or for user modifi- 
cation. It contains the argument-pass- 
ing and file-handling source code 
needed to copy from an existing file 
to a new file via a 16K buffer, with a 
cypher function being called to en- 
crypt the file. (If the file is less than 
16K, the input file name may be the 
same as the output thus destroying 
the original contents.) I chose a 16K 
buffer because it should fit easily 
with most compilers. This value may 
be adjusted to meet individual com- 
piler needs. 

Any of the three algorithms that 
follow may be included or linked 
with this shell. Caution is recom- 
mended to ensure that the function, 
name is appropriate for the method 
you use. The keys are passed in the 
CP/M command line and therefore 
are limited by its length as well as the 
argument-passing capability of the C 
compiler. 
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C-Plus (Fo 18m microsoft c) 
Turbo-Plus «.. Turbo-Pascal) 
Pascal-Plus (For IBM-Microsoft Pascal) 


Compile 50 times faster. 


Plus Software is a library of procedures 
crafted in assembly language and designed 
to enhance Turbo-Pascal™ and IBM- 
Microsoft Pascal. No royalties are required 
for applications developed using Plus 
Software. These procedures are extremely 
fast and combine automatically with your 
programs. The benefit to you is faster 
development and compilation time and 
smaller, faster application programs. 
Features include: 





Screen Genie 


The ultimate 

screen editor 

at any price. 

® Creates and edits screens 
for programmers and 
non-programmers 


© Resident pop-up facility 
for creating your 
Own pop-ups 

® Full typematic and cursor 
control. insert, overwrite in 
two dimensions 


© Paints/unpaints, draws/ 
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Easy to use selection menus 


© Copy/move lines or window 


Multiple input/output field display pamonhane ee 
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S$ 6S GE (Requires IBM PC 
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Turbo Spawn lets you execute any size 
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95 current program and continue with next 
instruction. Breaks the 64K barrier. 


(Requires MS PC DOS) 


inn inc. sours 


Please ‘send me: oO Check [] Money Order Name 
Cl G-Plus : ($59.95 (J Visa/MasterCard/Amex = 
CJ Turbo-Plus $59.95 a 
O Passa Pus $86.59 Mo As. — 
[) Screen Genie $69.95 
© Turbo-Spawn $39.95 
[1 Demo Disk $10.00 Exp. Date Ciy/StateZip 


Total amount U.S. shipping and handlingincluded |" 
Outside U.S. pays postage cae 















| 


= Nostradamus Inc. / 5320 South 900 Eas! 
= =on ‘SLC, Utah 84117 / Order by phone (801. 





Circle no. 251 on reader service card. 
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CRYPTOGRAPHER’S TOOLBOX 
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Cypher 1.c—Listing Two 

This minimal cypher algorithm uses 
an exclusive-ORing scheme to en- 
crypt the file with the keys passed. If 
the user employs keys of some prime 
length and performs multiple passes, 
the results can be quite difficult to de- 
cypher. Because the keys are limited 
to include only printable characters, 
you don't take full advantage of the 
256 codes available for a byte. 


Cypher2.c—Listing Three 

Now something a little more difficult 
for the code breaker, an algorithm 
that grew out of the previous listing 


f-1 0000 ze 2A OS 63 
f-1 0010 66 Gb i2 20 
f-1 0020 ze 6410 C62 SCO 
f-1 0030 2A 09 O09 O9 
f-1 0040 OD OA 2A 2A 
f-1 0050 Oo (9 (0 68 
f-1 0060 65 GE 63 6F 
f-1 0070 20 {7 + 69 74 
f-1 0080 OA 2A 2A OD 
f-1 0090 75 64 65 20 
f-1 OOAO OA (3 74 GI 
f-1 OOBO 2G 20 668 65 
f-1 00CO 63 79 70 68 
f-1 0O0DO SE “5 6D 2C 
f-1 OOEO 2n G2 /5 66 
f-1 OOFO 6S GE 74 20 
f-1 0100 OA 2A 2A 20 
f-1 0110 68 20 66 6F 
f-1 0120 ZA 2F GD OA 
f-1 0130 74 66 20 GD 
f-1 0140 65 28 63 G6F 
f-1 0150 26 268 5D 20 
f-1 0160 20 20 GB 65 
f-1 0170 OD OA 2F 2A 
f-1 0180 20 74 #GB 65 
f-1 0190 Si 63 GS 20 
f-1 01A0 20 20 70 72 
f-1 01B0 68 GE 67 2F 
f-1 01C0 66 65 72 6C 
f-1 01D0 SF f2 268 69 
f-1 01E0 69 2B 2B 29 
f-1 01F0 65 7/2 568 69 
f-1 0200 50 20 SE 26 
f-1 0210 6C 65 GE 67 
f-1 0220 1A 1A 1A 1A 
f-1 0230 1A 1A 1A 1A 
f-1 0240 1A 1A 1A 1A 
f-1 0250 1A 1A 1A 1A 
f-1 0260 1A 1A 1A 1A 
f-1 0270 1A 1A 1A 1A 
Table 1 
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and generates a prime-length key for 
each user key passed. One of 50 
prime values (between 1,009 and 
1,999) is selected as a function of the 
key passed. The prime key is then 
generated using a simple summing- 
ANDing-exclusive-ORing algorithm, 
and the file is encrypted using this 
new key. If two or more keys are 
used, this method guarantees a cy- 
pher period in excess of 1,000,000, 
which is significantly larger than 
most text files. 

The key-generation scheme is 
based entirely on the original key 
length and its contents, and I fail to 
see how this can be worked back- 
ward to regain the original, especial- 
ly if multiple keys are used. Some 


70 G6 65 72 31 26 Ga O89 
SD GF G4 75 6C 65 O09 O09 62 
OS 61 63 GS 68 69 (4 (4 69 
OS G3 0S G8 31 30 2F 31 30 
0D OA 2A 2A O08 S53 G2 6D 70 
GS (2 20 6D GF G4 & GC 65 
64 G6 (3 20 G4 689 72 65 63 
6S 20 (5 738 GS 72 20 GB 65 
OA 2A 2F OD OA OD OA 23 69 
SC 73 #4 64 G9 GF 2E 68 3E 
74 69 63 20 69 GE 74 20 69 
72 Gl Go GE G7 4 G8 36 OD 
6S f2 31 26 G2 7/5 G66 66 65 
20 63 6F 64 65 29 20 63 68 
GO GS (2 20 20 2A GS GF 64 
6E 75 6D 3B 7B OD OA OD OA 
6/ GS 74 20 6B 65 (9 6C 65 
72 20 GS 61 63.66 20 68 65 
OD OA 20 20 20 6B 65 79 6C 


64 65 SB 66 GS 7/8 6C 65 GE 
2| SD 20 4&6 55 40 4C 29 3B 
72 GC G GE G7 74 G8 2D 2D 
0D OA 2A 2A 20 65 GE 63 72 
20 G6 Ge GC 65 20 77 69 74 
68 65 /9 OD OA 2A 2F OD OA 
Go GE 7/4 G6 26 22 2D 65 GE 
64 65 63 6F 64 69 GE 67 20 
GE 22 29 3B OD OA OD OA 20 
60 20 38 20 G2 3C 30 GE 75 
0D GA 20 20 20 20 20 20 62 
9D 20 SD 20 62 75 66 G6 65 
6S GF 64 65 58 69 20 25 20 
74 6&6 SD 3B OD OA 7D OD OA 
1A 1A 1A 1A 1A 1A 1A 1A 1A 
1A 1A 1A 1A 1A 1A 1A 1A 1A 
1A 1A 1A 1A 1A 1A 1A 1A 1A 
1A 1A 1A 1A 1A 1A 1A 1A 1A 
1A 1A 1A 1A 1A 1A 1A 1A 1A 
1A 1A 1A 1A 1A TA 1A 1A 1A 


keys will generate shorter periods 
within the prime length, but this is 
easily tested with the tools provided. 
I welcome feedback or suggestions 
for improving this algorithm. 


Cypher3.c—Listing Four 

Adding chaos to disorder has proba- 
bly driven many a code cracker to - 
drink, and this is just what I’m trying 
to accomplish. I have modified the 
cypher2.c algorithm slightly to test 
the first character of each key 
passed. If the key begins with a dash 
(-), then the buffer is transposed by 
some value between 2 and 17; other- 
wise, it encrypts the file using the al- 
gorithm as described above. This 
simple but effective method puts the 


43 79 70 /*cypher1.c Cyp 
79 20 46 her module by F 
OD OA 2A .A.Scacchitti “* 
ee 38 35 oo 10/10/85 
6C 65 20 _** ** Simple 
20 20 20 cypher module - 
74 6C 79 encodes directly 
798 73 =#OD with user keys 
GE 63 66 “* ‘7 #inc 
0D OA OD ude <stdio.h> 
2C 20 GE Static inti, n 

OA OD OA , keylength; ~~~ 
72 20 20 cypher 1(buffer, 
St i2 2 num, code) char 
65 3B 20 “buffer, *code; 
2F 2A OD intnum;{"°/*" 
GE Gr, 74 “** get keylengt 
79 OD OA h for each key ~ 
65 6E 67 */'"*” keyleng 
68 69 6C th = 0; whil 

Gr 4 #=GS e(code[keylength 
OD 0A 20 + +]!= NULL); ”” 
3B OD OA keylength--; © 
79 70 _f 7? encrypt 
68 20 65 the file with e 

OD OA 20 ach key */ 
63 GF G64 printf(‘‘-encod 
62 /5 66 ing/decoding buf 
20 20 66 fon). ff 

6D 38 20 or(i=0; i<—=num; 
75 66 G6 i++)” buff 

f2 5B 69 er[i] = buffer{i 

6B 65 79 ] codef[i % key 

OD OA 1A length];"*}"""*" 
TA 4A 46. hl 
1A 14 A.  hmhmrmhrmrmrmrhmrr—ssS 
A 4 OArmrmrm™m™m™m™mCm™mCC—mC—C—C™—C 
A A AAlrtrw”:w~”™~™”™”™”COC:C:C*~:;~«~S 
- uA Ahhlrmrmrmrmr”C™”C™~™~™~C 
A 1 1rtrmrmrt~”COCOC*:*:*:*é;~:;: 
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icing on the cake; however it com- 
pletely reverses the decryption 
method. If the original run string 
was 


cypher file.txt filenew ABRAHAM -2 
LINCOLN -3 


then the decryption run string 
would be 


cypher file.new file.doc -3 LINCOLN 
-2 ABRAHAM 


Fv.c—Listing Five 

As I mentioned earlier, this is my re- 
placement for the CP/M dump utili- 
ty. It allows the user to pass one or 
two files in the run string for display. 


f-1 0000 2 2A 09 GS 79 
f-2 0000 oe 2A (2 Ga 79 
dif 0000 00 00 00 O00 00 


f-1 0010 68 65 72 20 6D 
f-2 0010 6G 65 jf2 20 GD 
dif 0010 00 00 00 O00 O00 


f-1 0020 2E 41 2E 53 63 
f-2 0020 2c 41 26 S53 GS 
dif 0020 00 00 00 OO O00 


f-1 0030 oA 08 02 O08 
f-2 0030 2A 0S 08 O38 O89 
dif 0030 00 00 00 OO 00 


f-1 0040 0D OA 2A 2A OD 
f-2 0040 OD OA 2A 2A OD 
dif 0040 00 00 00 OO 00 


f-1 0050 63 79 70 68 65 
f-2 0050 20 63 79 70 6&6 
dif 0050 43 1A 09 18 OD 


f-1 0060 65 6E 63 6F 64 
f-2 0060 20 67 G5 GE 65 
dif 0060 45 09 06 O1 O01 


f-1 0070 20 if G 74 & 
f-2 0070 20 6F 66 20 73 
dif 0070 OO 18 OF 34 IB 


fi  O080 OA 2A 2A OD OA 
f-2 0080 65 G6 of  & 
dif 0080 6F 44 4D 79 62 
f-1 0090 75 64 65 20 3C 


f-2 0090 2) 20 20 20 2 
dif 0090 55 44 45 00 1C 


Table 2 
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If one file name is passed in the run 
string, the output appears much like 
the CP/M dump.com output with the 
addition of the ASCII display. If two 
file names are passed, the output 
consists of a line from file 1, a line 
from file 2, and a third line contain- 
ing the exclusive-ORing of the two 
files (labeled ‘‘dif’’). In all cases, non- 
printable characters are replaced 
with a caret ( * ) in the ASCII portion 
and nulls are replaced with an equal 
sign ( = ) to readily identify compari- 
sons between two files. The compar- 
ative output is purely a byte-for-byte 
operation, and no attempt is made to 
realign the file to comparing charac- 
ters as in a compare utility. The first 
file length controls display length. 


70 68 65 72 31 2E 63 09 43 
00 00 00 00 03 00 00 00 00 
6F 64 75 6C 65 09 09 62 79 
00 00 00 00 00 00 00 00 00 
61 63 63 68 69 74 74 69 OD 
00 00 00 00 00 00 00 00 00 
09 09 09 31 30 2F 31 30 2F 
00 00 00 00 00 00 00 01 00 
0A 2A 2A 09 53 69 6D 70 6C 
00 00 00 00 10 06 00 00 00 
72 20 6D 6F 64 75 6C 65 20 
17 52 4D 02 0B 11 19 09 45 
65 73 20 64 69 72 65 63 74 
17 12 54 01 1A 52 04 43 1F 
20 75 73 65 72 20 6B 65 79 
4F 18 16 45 02 52 02 08 1C 
2A 2F OD 0A OD OA 23 69 6E 
27 25 27 20 2D 2A 03 49 4E 
73 74 64 69 6F 2E 68 3E OD 


53 54 44 49 4F OE 48 1E 2D 








Table 1, page 60, shows an example 
of screen output from the run string 
<fv cypher1.c>, and Table 2, below, 
shows one from the run string <fv 
cypher1.c cypher2.c>. 


Fstat.c—Listing Six 

Descriptive statistics is the name of 
the game here, and as with any statis- 
tical evaluation, you must be brutally 
honest (at least with yourself) to 
draw an objective conclusion. The 
entire file is read, 16K at a time. As 
you read, the occurrences of each of 
the 256 tokens are accumulated and 
you obtain the sum of all bytes as 
well as the min and max token occur- 
rences. The sum is divided by the to- 
tal characters to obtain the mean, the 


70 /* cypher1.c Cyp 
70 /* cypher2.c Cyp 
00 Se ee ee 
46 her module “by F 
46 her module “by F 
00 SSS S555 55 == 
2A A.Scacchitti * 
2A .A.Scacchitti “* 
00 ST Teel Se Se Se SS TS See Ie eel 
35 7 10/10/85 
35 - 10/11/85 
00 Sa See Se Se Se ee eee ee ee SS 
20 /™ © Sige 
78 —™  ™ Complex 
58 ====S==5== ==>=>=X 
2D 20 cypher module - 
2D cypher module - 
0D OD Ct RM E 
6C 79 encodes directly 
79 generates a key 
00 Ee TAC = 
OD with user keys 
6C of some prime | 
61 = [0 ER Sa 
6C " | sro 
20 engi) 
4C oDMyb’%’ -* "INCL 
OA OD ude <stdio.h> 
20 
2A 2D UDE= STDIO H -*- 
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CRYPTOGRAPHER’S TOOLBOX 
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max becomes the mode, and the 
range is the difference between min 
and max. Next, the 256-byte array is 
copied to a second array and sorted 
to obtain the median. 

With all calculations completed, 
the numerical values of occurrences 
are displayed in a 16 X 16 display for 
evaluation. The statistical character- 
istics are displayed, and the program 
pauses to await some keyboard entry 
to display the histogram. Depressing 
the space bar prints a scaled horizon- 
tal histogram of 16 groups (0-15, 16- 
31, ..., 241-256). 

The ideal random file (which is 


what you want to see) would have 
the following characteristics: 


mean 127.5 

mode not critical 

range < 20% of the total 
bytes divided by 256 

median at midpoint of range 

histogram reasonably flat 


Remember I said ‘‘ideal!’’ A se- 
quential file will display these ideal 
characteristics as well as a true ran- 
dom file. Also, files that look too good 
statistically should be just as suspect 
as those that don’t. Table 3, below, is 
the output produced by this article 
“as is,’ and Table 4, page 63, is the 
output when it’s encrypted with the 


run string 


cypher crypt-tb.art new frederick -1 
angelo -2 scacchitti -3 


In all fairness, I must state that 
other, possibly better, statistical 
methods exist for determining ran- 
domness. I opted to use descriptive 
statistics because they are more easi- 
ly understood and implemented. 


Makef.c—Listing Seven 

This is a simple enough utility but an 
absolute necessity if you are to evalu- 
ate encryption schemes. A file name 
of n 256-byte blocks is created, and if 
a value between 0 and 255 is passed, 
the file will be filled with this value. 


0 1 2 a 4 5 6 7 8 9 A B C D E F 
0 0 0 0 0 0 0 0 0 GO 3233 0 GO 333 0 0 
0 0 0 0 0 0 0 0 0 0 30 0 0 0 0 0 
3249 1 6 17 0 1 0 15 39 39 0 1 85 nO. 162 
9 17 35 25 10 9 16 20 5 6 11 1 0 3 2 2 
0 0 46 6 42 10 19 13 8 13 68 2 10 28 20 24 
13 20 0 14 28 59 3 1 5 1 7 1 S 0 3 1 
0 O &41 145 464 410 1528 315 217 551 914 6 75 518 337 #749 
766 287 14 #683 #832 1141 304 oo. 151 36 244 8 0 0 00 
0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 
0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 
0 0 0 0 0 0 0 0 0 0 0 0 0 0 8) 0 
0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 
0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 
0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 
0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 
0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 
16640 characters read from file CRYPT-TB.ART 
file mean = 85 06480/16640 mode = 32 ( 20 hex) 
file median = 0 file range = 3250[ min = 0 max = 3249 ] 
scale = 156 
Oto 15= 6661'***** 
1610 31=— 30)" 
32 to 47 = S684 itt ttt RRR RRR RRR EE 
48to 63= 162!)** 
mato 79 = 3271" * 
80to 95= 146!!* 
96 to 111 = TBQG Ltt ttt RAR RRR EERE RRR EREEE EERE E REE RR EEE 


112 to 497 eee 3/89 [it TARA AA RRR RRR KKS 


128 to 143 = 
144 to 159 = 
160 to 175 = 
176 to 191 = 
192 to 207 = 
208 to 223 = 
224 to 239 = 
240 to 255 = 


oO 08 © © oo © 


Table 3 
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If no value (or one that is nonnumer- 
ic) is passed, each block contains a se- 
quential count from 0 to 255. A bene- 
fit of this program is its ability to 
clean a disk. The user simply creates 
a file the size of the remaining disk 
space and then erases it. This results 
in all free disk space being set as the 
user defined. 


Sp.c—Listing Eight 

Along with the fstat utility, sp.c con- 
firms or denies (maybe even ques- 
tions) the statistical data you have re- 
ceived. A brute-force search method 
is used to find matching character 
strings in the file. By default, the 
search starts at the first character 
and searches the first 128 bytes for a 


0 1 2 3 
6 3) Gc G& 
SF 38 & f2 
so. 6h8hlLUCrNSC“(<i;iéiSSS 
76 So @ S&S 
71 so 7 2 
61 70 Ww & 
76 (0 QB 
Ss 6 Bf 8 
7 © & FF 
Se GG GG se 
SS. 55 eC 
71 7] se OCG 
76 63 71 62 
so 6 6f(0l6UC GCG 
76 & &@ 3 
SS GI 64 62 


match of four or more characters. If 
the match depth exceeds the block 
size it is searching, the program will 
return to CP/M after displaying the 
match data. If not, it will continue in 
its search. Block size to search, mini- 
mum depth of comparison, and start- 
ing point in the buffer may optional- 
ly be changed in the run string. 

Also, if an additional argument is 
passed (one more than the three 
mentioned), the software converts 
the data in the buffer to delta form— 
that is, element/n] = element/n) - ele- 
ment/[n+1) for all data in the buffer. 
After the conversion is made, the 
search scheme continues as before. 
This feature allows you to evaluate 
the file for some mathematical 


& 9 6 7 8 9 A 
77 Ot Ss fF 2 FS S&S 
a )62 6ShlcC CC Ci‘i=CK Ce 
65 46 6 t6& fF Of if! 
S071 69 64 #71 296 =—s«6. 
68 72 & 4 & St 8 
SO 45 & 6 3 BS 6 
SoS 0 6 WO SS 8 f2 
45 G2 8 8 6 B iit 
66 58 Gf Sf GB G2 6 
so 4 +s«+2 sil 64 65 #466 
ss 865 = = 6S6flhCldC‘zVAS:~C;é=‘ Gr CG 
SA 66 G6 6 76 G1 58 
Ss GO 6 6 7% G 6 
—™ os & 0 & 861 70 
ae 6Ge.StiC‘«SGS SS 2 $$ 52 
os S af &S& Gf @& 


16640 characters read from file NEW 
file mean = 126 07580/16640 mode = 142 ( 8E hex) 
file median = 65 file range = 45[ min = 41 max = 85] 


sequence. 

One drawback to this program as it 
stands is the limiting factor of the 
buffer size. No attempt is made to 
search beyond it. This shouldn't mat- 
ter for most text files. 


Small-C, CP/M, and 
Miscellaneous 

The function chkkbd( ) enables you 
to stop display (program) activity if 
Ctrl-S is depressed. Following this 
with a Ctrl-C causes a return to CP/ 
M, and any other character will al- 
low the program to continue. This 
function calls a bdos( ) function, so 
the user may have to modify this for 
other operating systems. The 
getchx( ) function is a nonechoing 


B Cc D E F 
66 55 6G! 71 1 
6 2 WG 2 & 
6S 65 & 65 /i 
4 3s (4% fe 
SS Ge a 33 & 
61 T1 Gr 41 73 
so. 60670, CGS iC 
S66 Gf GG 8 if 
55 «61 60 8 i 
oS oF #$®?m@ a is 
76 @#¢7 =#é=i& io Gs 
6S %& 38 GG Ft 
5.60 UG Cis} 54 
Se 3 #68 3 66 
oO f4—hC Ud fAldlCU tc ite 
6s GG 8 $i 


scale = 21 

0 to BG ee AG ee eee eee eee eee te eee 

16 to Ba ow ORG tt eee eet eee eee ereete tte 
32 to Ay ce Wa EER EE eee ee ee re eeee cee eet 
48 to Ro ee eee eee 
64 to 7T3 = ary | ERE eee ER et eee eee ere 

80 to 95 = Oe sg Se 

G6 to 11) — 1065 et ote Tet ee eet eee eeeeet tres 
112 to SOF ce FG TT ee eee ee ee eee eee eee 
128 to A a i eee ee ee eee eee tee 
SO a Ee Oe eee ee ere ee en te ee ee eee terre 
160 to oe 
176 to Se eke ee we wy 
OT | FO EE eee Ree eee ee eee ee eee eee eeeeeeereeeeee 
BR ag ee 1 1G Tt Oe ee eee eee eee eet 
ee eg eg 
A 5 96S 07 EERO eee eee eet ee eee eterna 


| Table 4 


Dr. Dobb’s Journal, May 1986 


63 


CRYPTOGRAPHER’S TOOLBOX 
(continued from page 63) 


version of getchar( ) that uses BDOS 
function 6. You can substitute get- 
char( ) for getchx( ). 

The functions calloc( ), malloc( ), 
and cfree( ) are used for the dynamic 
allocation and deallocation of memo- 
ry. My _ allocation/deallocation 
scheme is of the simple variety in 
which the programmer must pay 
heed to order or pay the conse- 
quences. The source code contained 
here should work with most imple- 
mentations of these functions. 

Printer output can be obtained 
from any of the programs by using 
the CP/M Ctrl-P function. It was the 
simplest method to implement. 

Math functions (especially floating 
point) are difficult for Small-C. There 
are several routines in the fstat.c 
source that perform the necessary 
long and fractional calculations. It’s 
not necessary to change these; how- 
ever, if your compiler supports floats 
and longs, have at it. 


Each program will display the us- 
age if entered without the proper 
number of arguments in the run 
string. Also, because most software 
users begin to feel uncomfortable 
when their computer is off some- 
where performing exotic calcula- 
tions, each program displays status to 
the screen to put these fears at rest. 


Cypher Benchmarks 

My version, written in Small-C, is ge- 
neric enough to adapt to any C com- 
piler. Running on a 4-MHz, Z80-based 
CP/M system, it benchmarks at less 
than 1K per second for file I/O, 16K 
per second for file transposition, and 
approximately 4K per second per 
key for encryption. Key encryption 
is difficult to benchmark because it 
includes the time to generate the 
prime-length key, which varies from 
1,009 to 1,999 characters in length. 


And Finally 

These tools should be employed with 
a measure of common sense. A 
strong cypher is indicated only 





when both statistically and pattern- 
wise indicated. (And it doesn't hurt to 
view the file either.) My intent in de- 
veloping these utilities was to pro- 
vide the cryptographer-programmer 
with a means to evaluate the 
strength of an encryption scheme as 
well as the resistance of schemes to 
cracking. Like most tools, however, 
these can be used for destructive as 
well as constructive purposes. The 
author assumes no liability for illegal 
use of these tools and sincerely be- 
lieves they can result only in the de- 
velopment of stronger encryption 
schemes. DDJ 


(Listings begin on page 94.) 
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NEON: TURN ON THE FULL POWER OF YOUR MACINTOSH: 


HIS MESSAGE IS FOR BEGINNING PROGRAMMERS, TOO! 

Hidden within your Mac is the programming power, flexibility, 
and speed to match your imagination. Neon is your key to this 
»bject-oriented world. Based on the same design philosophy as 
she Mac itself, Neon lets you create and command objects — 
srogram modules that you build, perfect, and add to your 
9ersonal collection of tools. In this Smalltalk-like environment, 
jou wield the power to quickly assemble and test ideas, tuning 
1S you go for maximum speed and efficiency. (] Neon now 
ncludes full floating point support. An integrated Neon As- 
sembler is also available as an add-on product. (J Neon is easy 


O work with and comes with a comprehensive manual by 





Janny Goodman. LJ) Created by Kriya Systems, Inc. for the 
levelopment of our Typing Tutor III™ program, Neon is your 
inswer for professional software development. With Neon, 
here are no licensing fees. Ever. For the MacIntosh developer, 
Veon is the best choice. 








'O choose, call 1-800-34-KRIYA (In Virginia, 703-430-8800) with Visa/MC. Or Write KriyaSystems, Inc.., 
1x Export Drive, Sterling, VA 22170. Neon, $195; Neon Assembler, $50. Add $5 shipping for each. 


eon and Typing Tutor III are trademarks of Kriya Systems, Inc. Apple Macintosh is a trademark of Apple Computers, Inc. 


Circle no. 100 on reader service card. 


64 Dr. Dobb’s Journal, May 1986 


BRADY Knows 
Programming. 


You'll learn to whip every element of your programming into shape with the 
latest information and guidance by America’s foremost technical experts. 
Just call toll-free or use the coupon below to order today. 





Creating Utilities 
With Assembly Language 
a 


Programming Tools 
for the IBM PC 





1. Beyond the basics, this guide explores 2. Includes a listing for the remarkable 3. Learn the techniques used for creating 4. Includes code listings for three working 
new structured concepts to analyze and QUICKCODE code generator which auto- assembly language utilities. Includes 10 of debuggers including single-stepping, cross 
solve problems in C with tools o matically writes input, locate, and print the most popular utilities such as DBUG referencing, and mapping utilities. $19.95 
modularity, input and output functions, statements. Also unleashes high memory SCAN, CLOCK, UNDELETE, ONE KEY, (Disk available) 

aris and structures, and bit manipulation. access and makes screendesignacinch. PCALC calculator and notepad and five 

$21.95 $19.95 others. $21.95 (Disk available) 


¥ LANGUAGE 
-RAMMING 
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5. A definitive reference text for advanced 6. Probes the inner workings of the 8086 7. Here’s a compendium of many of the 8. A breakthrough explanation to the tech- 
programmers. You'll find over 150 discus- (used by the AT&T 6300) and 8088 (IBMPC) most useful, but often neglected, advanced nical operations of DOS for programmers. 
sions of common hardware-control tasks (in chips...and describes specific techniques programming concepts. A tutorial in format Shows how to use the /O services with dis- 
BASIC, Pascal, or C) as well as assembler for using the full capability of these chip that uses BASIC for examples, it covers cussions of: character and non-character 

| overlays, drivers, and real-time operators. designs while programming inassembler. techniques such as: linked data structures; functions; directory and file management 

$22.95 $18.95 recursion; pipelining; and dynamic storage routines; and memory management. 

| allocation. includes _—— for 25 sub- Includes BIOS functions and info on IBM 

| routines. $21.95 (Disk available) “compatibles.” $16.95 

; 

| 

! 


Now at your book or computer store. 800-624-002 In New Jersey: 
Or order toll-free today: 800-624-0024 
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BRADY COMMUNICATIONS COMPANY, INC. PE ai aaa fae 5 a 
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| c/o Prentice Hall , | 
P.O. Box 512, W. Nyack, NY 10994 Signature 

| i Name 
Circle the numbers of the titles you want below. 








| (Payment must be enclosed; or, use your charge Address 
card.) Add $1.50 for postage and handling. City State Zip 
| Enclosed is check for $ or charge to (New Jersey residents, please add applicable sales tax.) GR-BKDD-BK(6) | 
(_] MasterCard [} VISA Dept. 3 
1 (0-89303-473-8) 2 (0-89303-784-2) 3 (0-89303-584-X) 4 (0-89303-587-4) i 
5 (0-89303-787-7) 6 (0-89303-424-X) 7 (0-89303-481-9) 8 (0-8359-5655-5) 
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Phoenix 


Makes 
Programmers 









reams 
Come Irue 








[ ntroducing the next 
generation in programming 
software. Top-of-the-line 
quality and performance for 
the programming professional 
who won’t settle for second 
best. A full line of MS-DOS°/ 


PC DOS programs and utilities. 
Ready to run on your IBM® 
PC, XT,"AT,” or compatible. 


Designed to help you write, tes 
and deliver the best programs 


possible. All at a price you can 
afford. 


Circle no. 91 on reader service card. 
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m May PforCe™ Be With You! 


NEW! Writing in C? Half your job could be done already. 
With PforCe. The first library of object-oriented C func- 
tions and subsystems. Written in C. Fully integrated, opti- 
mized, debugged, and ready to go. 

High level functions to manipulate objects like windows. 
Fields. Screens. Menus. Change an object’s characteristics 
globally. Or tailor them to a specific application. Low level 
functions for complete hardware control. Sophisticated 
subsystems to handle complex tasks. A database system 
with demand paging and B-trees. 

But that’s not all. PforCe’s routines are easy to find and 
use Alphabetically. By funtional group. Or, while you’re 
editing, through a pop-up utility. PforCe is available for 
Microsoft®Lattice®CI86;"and Wizard® compilers. And 
PforCe comes with an easy to follow tutorial to help you 
become more productive quickly. $475. Order before 
June 15, 1986 and save $80. Special offer $395. 


w Plink”86 Plus Adds A New Dimension 


In Modular Programming. 


NEW! You can create up to 4,095 overlays, in one or many 
files, on one or many disks. And in any MS-DOS/PC DOS 
environment Plink 86 Plus will automatically cache overlays 
using all or part of the available memory including the IBM 
AT extended memory. Allowing you to get better per- 
formance from your large machines. 

Merge object modules so you can package them together. 
Reload overlays upon function return. Allocate library 
modules to overlay structures, automatically. 

Use the same module in different programs. Change the 
overlay structure of an existing program without recompil- 
ing. Or, use one overlay to access code and data in other 
overlays. $495. 


m Pfix"86 Plus. The Most Advanced Symbolic Debugger 


On The Market Today. 


NEW! Debug without a listing since you can see and enter 
symbolic names or absolute addresses in breakpoints, data 
displays, expressions, or with the in-line assembler. Con- 
figure your own menus and keys. Get tracebacks to save 
trace histories. Set breakpoints in the source file window. 
Stop and restart a debugging session at any time. And, 
display source files, disassembled object, data area, stack, 
breakpoint settings, CPU and coprocessor registers, simul- 
taneously. $395. 


= Pre-C." The Lint For MS-DOS. 


NEW! Find usage errors almost impossible to detect with 
a compiler. Cross-check multiple source files and param- 
eters passed to functions. Uncover interface bugs that are 
difficult to isolate. All in a single pass. 

Our new Pre-C gives you the full range of features C 
programmers working in UNIX® have come to expect from 
their Lint program analyzer. 

Capabilities no C compiler, with or without program 
analyzing utilities, can offer. In fact, Pre-C outlints Lint, 
since you can handle analyses incrementally. S395. 


™ Pfinish” Maximizes Your Program’s Efficiency. 


Pfinish helps you turn your beta-test product into a 
software work of art. It analyzes your program or the entire 
operating environment during execution, and produces 
reports which tell you how much time was spent in each 
routine or interrupt, who called it, how many times, and 
much more. 

Wasteful, inefficient, or non-optimal areas of code 
become immediately apparent, whether they’re in your 
code, the compiler library, or in the operating system 
routines themselves. $395. 





™ Get A 15 Percent Discount 


™ Ptel” Gets The Lead Out Of Binary File Transfer. 


NEW! Ptel is the first file transfer software to include 

an on-line service that gives you immediate electronic 
updating of your entire Phoenix software library. New soft- 
ware bulletins. Sample Files. On-line technical support. 
And, an opportunity to exchange information with other 
Phoenix software users. 

Plus, you get error-free file transfer and access to main- 
frames, minis, and micros. ASCII. XModem. Modem7. 
Telink and Kermit. You can transfer 8-bit binary files over a 
7-bit data path with Kermit. Transfer groups of files using 
ambiguous file references. Or, transfer whole subdirectories 
with a single command using Telink. Ptel keeps track of 
the original file size and creation date. 

Ptel also offers a script language, backward scrolling, 
and the ability to handle DOS commands from inside the 
program. $195. 


™ Spoil Yourself. Get A Pfantasy Pac” 


Today! 


NEW! Get six of the best MS-DOS 
programming packages on the market 
today. The new Plink86 Plus, 
and the latest versions of 
Pfix86 Plus, Ptel, Pmate, iw 
Pmaker, and Pfinish. A $1900 SUR ores 
value. Plus, the new Ptel on- vo — 

line software update service. 
All for $1295. 
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On All Software Purchased | 
With A Pfaster™286 Board. 


NEW! Now you can increase | 
the performance of your IBM 
PC, XT orcompatible,and_ | 
make money doing it. Buy a 
1Mb, 2Mb, or with our new PfasterAccess”/2Mb option, 

a 4Mb accelerator board that supports EGA, and we’ll give 
you 15 percent off any Phoenix program development tools 
that you buy at the same time. No dealers please. This 
offer is good for a limited time. 


Programmers, make your programming dreams come 
true. Call or write: 
Phoenix Computer Products Corporation 
320 Norwood Park South 
Norwood, MA 02062 (800) 344-7200. 
In Massachusetts (617) 762-5030 


Programmers’ Pfantasies 


by 

pene 
Pfix86 Plus, Ptel, Plink&6 Plus, are trademarks of Phoenix Software Associates Ltd. 
Programmers’ Pfantasies, Pre-C, Pfantasy Pac, Pfaster286, PfasterAccess, PforCe, and 
Pfinish are trademarks of Phoenix Computer Products Corporation. MS-DOS is a 
registered trademark of Microsoft Corporation. UNIX is a trademark of AT&T Bell 
Laboratories. IBM is a registered trademark, XT and AT are trademarks of International 
Business Machines Corporation. Microsoft is a registered trademark of Microsoft 


Corporation. Lattice is a registered trademark of Lattice, Inc. CI86 is a trademark of 
Computer Innovations. Wizard is a trademark of Wizard System Software. 











COMBINE THE 
RAW POWER OF FORTH 
WITH THE CONVENIENCE 
OF CONVENTIONAL LANGUAGES 


HS 
FORTH 


Why HS/FORTH? Not for speed 
alone, although it is twice as fast as 
other full memory Forths, with near 
assembly language performance 
when optimized. Not even because 
it gives MANY more functions per 
byte than any other Forth. Not be- 
Cause you can run all DOS com- 
mands plus COM and EXE programs 
from within HS/FORTH. Not be- 
Cause you Can single step, trace, de- 
compile & dissassemble. Not for the 
complete syntax checking 8086/ 
8087/80186 assembler & optimizer. 
Nor for the fast 9 digit software float- 
ing point or lightning 18 digit 8087 
math pack. Not for the half mega- 
byte LINEAR address space for 
quick access arrays. Not for com- 
plete music, sound effects & graph- 
ics support. Nor the efficient string 
functions. Not for unrivaled disk flex- 
ibility — including traditional Forth 
screens (sectored or in files) or free 
format files, all with full screen edi- 
tors. Not even because |/O is as 
easy, but far more powerful, than 
even Basic. Just redirect the charac- 
ter input and/ or output stream any- 
where — display, keyboard, printer 
or com port, file, or even a memory 
buffer. You could even transfer con- 
trol of your entire computer to a 
terminal thousands of miles away 
with a simple >COM <COM pair. 
Even though a few of these reasons 
might be sufficient, the real reason 
is that we don’t avoid the objections 
to Forth — WE ELIMINATE THEM! 


Public domain products may be 
cheap; but your time isn’t. Don't 
shortchange yourself. Use the best. 
Use it now! 


HS/FORTH, complete system: $395. 
with “FORTH: A Text & Reference” 
by Kelly and Spies, Prentice-Hall 
and “The HS/FORTH Supplement” 
by Kelly and Callahan 
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HARVARD 
SOFTWORKS 


PO BOX 69 
SPRINGBORO, OH 45066 
(513) 748-0390 


Mastercard 
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LETTERS 





Listing One (Text begins on page 8.) 


[** 
ak 
xk 
ak 
xk 
kk 
xx 
xk 
xk 
xk 
xk 
xk 
xk 
xk 
ak 
xx 
kk 
xx 
ak 
xk 
xk 
xk 


xk / 


#define C186 1 


LJ.C -- A printing utility for the HP LaserJet 


This program prints a series of files on the LaserJet 
printer. The files are printed in a ‘‘landscape'' font at 
17 characters to the inch. To take advantage of this 
density, two ‘‘pages'' of information from the file are 
printed on each piece of paper (left and right halves). 


Usage is: LJ filel file2 file3 ... 


Where file# is a valid MS-DOS filename, included on the 
command line. This program is compatible with Lattice Cc 
on the IBM PC and the HP Touchscreen computers. 


Joe Barnhart 

Ray Duncandate and time stamping 

Joe Barnhart revised date stamping 

Ray Moon modified for CI86 December 13, 1985 
& revised EOF test 


original version May 5, 1985 
May 22, 1985 
June 6, 1985 


/* Remove this #define => Lattice C version */ 


#ifdef C186 
#include <stdio.h> 


#else 


#include <h\stdio.h> 


#endif 


#define MAXLINE 56 
#define Page oe 
#define TAB 8 


/* maximum lines per page */ 
/* for compilers without ‘/f' */ 
/* width of one tab stop */ 


#ifdef C186 
typedef struct { 


#else 


unsigned short ax,bx,cx,dx,si,di,ds,es; 
} REGSET; 


typedef struct { 


#endif 


iit 'ak, bk, Gx, dx, ei; di: 
} REGSET; 


Main(arge, argv) 


{ 


} 


int argc; 
char *argv[]; 


int filenum; 
FILE *fp, *prn, *fopen(); 


if( (prn = fopen(‘‘PRN:'', ‘‘w'') ) == NULL ) 
printf(‘‘Error opening printer as file.\n''); 
else { 
/* initialize the LaserJet for landscape printing */ 
fprintf(prn, ‘**\033E\03346110\033 (s17H\033&618d6E'' ); 
for(filenul=1; filenum < argc; filenum++) { 
fp = fopen(argv[filenum], ‘‘r''); 
if (fp == NULL) 
printf(*‘*‘file %s doesn't exist.\n'', argv [filenum)] ) 
else { 
printf(*‘Now printing %s\n'', argv[filenum)) ; 
printfile(fp, prn, argv[(filenum]); 
fclose(fp); 
} 
fprintf(prn, **\015\033E''); /* clear LaserJet */ 
} 


print file(fp, prn, filename) 


{ 


} 


EILE. “Ip, *prn; 
char *filename; 


int pagenum = 1; 

while( !feof(fp)) { 
fprintf(prn, **\033éa0r85m5L\015''); 
printpage(fp,prn) ; 
if( !feof(fp)) { 


/* set left half */ 

/* print page */ 

/*if more .. */ 
fprintf(prn, ‘*\033&a0rl171m91L''); /*set right half */ 
printpage(fp, prn); /* print another */ 


} 
stamp(prn, filename, pagenumt+); 
fputc(PAGE, prn); 

} é 


/* title */ 
/* kick paper */ 


printpage(fp,prn) 


PILE *fp;.-*prn: 
int c,line,col; 
line = col = 0; 


while(line < MAXLINE) 
switch(c = fgetc(fp)) { 


case ‘\n': /* newline found */ 
col = 0; /* zero column */ 
line++; /* adv line cnt */ 
fputc(‘\n',prn); 
break; 
case ‘\t*: /* TAB found */ 
do 


fputc(*\040',prn); 
while ((++col % TAB) != 0); 
break; 


(continued on page 70) 
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PROBLEM: There’ just no easy way to move from one 
software program to another. 


THE SOFTLOGIC SOLUTION: Software Carousel 


Now you can keep up to 10 programs 
loaded and ready to run. 


Hard to believe, but some people are 
happy with just one kind of PC software. 
Well, this is not a product for them. 

But if youre someone who 
depends on many packages, all 
the time—someone who'd use 
several programs at once if you 
could, well now you can. With 
Software Carousel. 


Why call it “Software 
Carousel’’? 


In some ways, Software 
Carousel works like the slide 
projector youre used to. You 
load a handful of pictures, view one at a 
time, then quickly switch to another. A 
simple idea, with powerful possibilities 
for computing. 

Here’s how it works. When you start 
Software Carousel, just tell it how much 
memory you have, load your software and 
go to work. 

Need to crunch numbers? Switch to your 
spreadsheet. Need your word processor? 
Don't bother saving your spreadsheet file. 
Just whip over to your document and do 
your work. Snap back to your spreadsheet, 
and it’s just like you left it. 

With up to ten different programs at your 
fingertips, you'll have instant access to your 
database, communications, spelling checker, 
spreadsheet, word processor, RAM resident 
utilities, languages, anything you like. 


Reach deep into expanded memory. 


This could be the best reason ever for 
owning an expanded memory card, like the 


Intel Above Board, AST RAMpage, or any 


Circle no. 284 on reader service card. 


With Software Carousel 
running in RAM, you can 
load a program and retrieve 
a file up to 15 times faster. 
Test conducted on an IBM XT 





card compatible with the L/I/M Extended 


Memory Standard. 

Software Carousel puts programs into 
this “high-end” memory for temporary 
storage when they’e not in use. And 
switches them back out when 
you want them. It’s fast, effic- 
ient, and easy. 

If you want, Software Car- 
ousel will even use your hard 
drive for swapping. Just allo- 
cate a portion for storage, and 
go to work. 


Sidekick, Superkey 
and Ready. All at the 


same time. 





You know what happens if 
you try loading two or more RAM resi- 
dent utilities at once. You 


Carousel will look for the programs you 
use most often, and optimize them for the 
quickest access. 

You can spend a lot more money, and 
still not get the convenience and produc- 
tivity increase of Software Carousel. 

The way we see it, there are certain 
things you have the right to expect from 
your computer. Access to your software is 
one of them. And at our special introduct- 
ory price of just $49.95* Software Carousel 
is the best way to get it. 

But hurry. This price won't last long. 

Order today at 800-272-9900 (603-627- 
9900 in NH) or send the coupon below. 

Special combination pricing is available 
for the purchase of Software Carousel 


and other SoftLogic products, including 
DoubleDOS and Disk Optimizer. 





get crashed keyboards, a Spin iin, Re aR te ea eR rhe 
frozen screens, all kinds of $A Q95* 
interference between pro- | 47 Software Carousel 49 


grams fighting for control. 
With Software Carou- 


sel, you can have as many 


oe Name 
accessories and utilities on- 
Company 
tap as you want. Just load 
Address 
Carousel partitions. Since City 


they can’t see each other, 


they can’t fight. Card # 


The easy way to 
maximize PC power. 


With all this power, you 
might think Software Car- 
ousel is complicated and 
difficult to use. Not so. Set 
it up once, and it will re- 
member forever. Better still, 


different ones in different | 


YES! Send me 
Special Introductory Price of just $49.95. 


Signature 


SoftLogic Solutions, Inc. 
530 Chestnut Street 
Manchester, NH 03101 
800-272-9900 
(603-627-9900 in NH) 


i Call today: 800- 212- 9900 


copies of Software Carousel at the 








State/Zip 
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LETTERS 


Listi Ng One (Listing continued, text begins on page 8.) 


/* page break or */ 
/* EOF found */ 
/* force terminate */ 


/* no special case */ 
/* print character */ 


/* widen margins */ 
/* move to row 58 */ 


case PAGE: 
case EOF: 
line = MAXLINE; 
break; 
default: 
fputc(c,prn); 
cortt; 
break; 
} 
} 
stamp(prn, filename, pagenum) 
FILE *prn; 
char *filename; 
int pagenum; 
{ 
char datestr[10], timestr[10]; 
fprintf(prn, **\033&a51171M''); 
fprintf(prn, **\015\033&6a58R''); 
fprintf(prn, ‘‘File: %-113s'', filename) ; 
fprintf(prn, ‘‘*Page %-3d'', pagenum) ; 


timestamp(timestr) ; 

datestamp(datestr); 

fprintf(prn, ‘* $s ts'', 
} 


datestamp(datestr) 
char *datestr; 
{ 
REGSET regs; 
int month, day, year; 


regs.ax = 0x2a00; 
#ifdef C186 
sysint21 (&regs, éregs) ; 
#else 
int86 (0x21, éregs, &regs) ; 
#endif 
month = (regs.dx >> 8) & 255; 
day = regs.dx & 255; 
year = regs.cx - 1900; 
sprintf(datestr, ‘*%02d/%02d/%02d'', 
} 


timestamp (timestr) 
char *timestr; 
{ 
REGSET regs; 
int hours,mins; 


regs.ax = 0x2c00; 
#ifdef C186 
sysint21 (éregs, éregs) ; 
#else 
int 86 (0x21, &éregs, &regs); 
#endif 
hours = (regs.cx >> 8) & 255; 
mins = regs.cx & 255; 


datestr, timestr); 


month, day, year); 


sprintf (timestr, ‘*%$02d:%02d'', hours, mins); 


End Listing 


TRUE MULTI-TASKING! 





TASKVIEW is high tech, available now, and it works with virtually all DOS software. 
Give Lotus, Sidekick, Multimate or most any DOS program the advantages of real multi- 
tasking. It’s simple to use, compatible, bulletproof and most of all, it won’t slow you 
down. That’s because TASKVIEW only shares your computer when YOU want it shared. 
At other times, your visible program runs at full speed, waiting for you to easily 
switch from program to program at the touch of a key. Compatible with most DOS 
computers including the IBM PC/XT/AT/Jr. series, you can order TASKVIEW today 


for only $69.95 + 5.00 Shipping and Handling, VISA and Mastercard. 


ORDER LINE 
(206) 367-0650 


30 Day Money Back Guarantee. 


70 


Taskview trademark Sunny Hill Software. 
Lotus trademark Lotus Development Corp. 
Sidekick trademark Borland Intl. 
Multimate trademark Ashton Tate. 


Circle no. 172 on reader service card. 


Sunny Hill 
Software 


13732 Midvale North Suite 206 
Seattle, Washington 98133 
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PROBLEM: Handling your need for more megabytes, 


without spending megabucks on a new drive. 


THE SOFTLOGIC SOLUTION: Cubit™ 


Now get up to twice the capacity from 
all your storage media. 


You know what happens. The more you use 
your computer, the more information you 
create. And the faster you fill up your disk. 

The 1OMB drive that once seemed enor- 
mous is now jammed with important 
files. That 20MB that should have 
lasted years is crowded in a 
matter of months. 

Of course you could keep 
buying bigger hard drives. 
Or you could get Cubit and 
get the maximum storage 
space from the drives you 


Binary 
files 


Spreadsheet 
files 


already have. compression on data files, effectively 
doubling the storage capacity of all your 
Whatis Cubit? were 


In brief, Cubit is an advanced software tool 
that automatically reduces the number of 
bytes required to store a file, then converts the 
file back to its original size when retrieved. 
Some programmers call this effect “data 
compression,’ others, “disk expansion.” Either 
way, the result is the same. 

Here's how it works. When Cubit com- 
presses a file, it first compares each word to its 
massive English word dictionary. Words that 
match are reduced to a predetermined code of 
just one, two or three bytes each. It then saves 
the abbreviated version to disk. Decompres- 
sion works just the opposite. 

To accommodate other words and symbols, 
Cubit uses two more compression techniques. 
One assigns new, shorter codes to unusual 
words. Another compresses according to the 
frequency of character strings in non-text data. 
So no matter what kind of files you create, 
Cubit ensures maximum space savings. 

Best of all, you'll be using the same fast, 
reliable data compression techniques used 
on mainframe computers for decades. 


How much disk space will you save? 
Because the vast majority of data created 
on PC’s is standard ASCII text—letters, 
numbers and other English 
language symbols—-we’ve 
optimized Cubit for word 
processing and database 
files. With these, you'll get a 
minimum of 50% expansion on 
up to a full 100% or more. 

At the same time, you can 
expect a significant 30% to 
50% improvement with 

other kinds of data. Including 
spreadsheet files, program code, 
graph and image files, even binary 









Text 
files 
With Cubit, you'll get as much as 100% 


data. 


does with hard disk drives. 


Run Cubit where you want, 
when you want. 


Maybe you'll want to use Cubit 
for all your files, or maybe just 
some. So Cubit lets you specify 
exactly which files to work on 
and which ones to leave alone. 

In RAM resident mode, 
Cubit works quickly and 
invisibly, compressing and 
decompressing right from 
within any program you run. 
Or use Cubit’s powerful file 
management mode. It supports 
wild-card and global file names, 
and addresses sub-directories 
up to thirty levels deep. 


Save time and money, as well 
as disk space. 


A compressed file is a smaller 


file. So with Cubit, back-ups 


And Cubit works just as well 
with floppies and tape cassettes as it 


take less time, as well as less space. And 
communicating compressed files means 
significant savings on phone line charges. 
Any way you look at it, Cubit will pay for 
itself in no time. And that’s especially true now. 


Special limited time offer. 


Buy Cubit now and you'll save even more. 
Because for a limited time, you can buy Cubit 
at the special introductory price of just $49.95* 
But hurry. This special price won't last long. 

Ask for Cubit at your computer dealer. Or 
order directly from SoftLogic Solutions by 
calling 800-272-9900 (603-627-9900 in NH), 
or mail in the coupon below. 

Special pricing is available when you buy 


Cubit along with other SoftLogic products 
including DoubleDOS, Software Carousel 
and Disk Optimizer. Ask for details. 


& Cubit "4995 


YES! Please send me 


introductory price. 


a 





copies of Cubit at this special 





| 
| | 
| Name | 
| Compaty.4 on ee ee | 
Address 
| City Stare/ 7k Cae ae | 
| Check Enclosed O° VISAT] MCO AMEX | 
| Card # | 
| Signature | 
| | 
Lf | 


Exp. Date 


SoftLogic Solutions, Inc. 
530 Chestnut Street 
Manchester, NH 03101 


SOFTLOGIC 
800-272-9900 


SOLUTIONS 
(603-627-9900 in NH) 


| Call today:800-272-9900 | 


i. 


*plus $5.00 shipping and a 
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COMPLETE SOURCES 
NO ROYALTIES 


COMPREHENSIVE C Power Packs 
include over 1000 functions which 
provide an integrated environment 
for developing your applications ef- 
ficiently. ‘“This is a beautifully doc- 
umented, incredibly comprehensive 
set of C Function Libraries.’’ 

— Dr. Dobb’s Journal, July 1984 


USEFUL “‘...can be used as an ex- 
cellent learning tool for beginning C 
Programmers...” 

— PC User’s Group of Colorado, Jan. 1985 


FLEXIBLE Most Compilers and all 
Memory Models supported. 


RECOMMENDED “‘l have no hesita- 
tion in recommending it to any pro- 
grammer interested in producing 
more applications code, using more 
of the PC capabilities, in much less 
time.’’ — Microsystems, Oct. 1984 


gy PACK 1: Building Blocks | $149 
DOS, Keyboard, File, 
Printer, Video, Async 

gm PACK 2: Database 


B-Tree, Virtual Memory, 
Lists, Variable Records 


gy PACK 3: Communications $149 
Smartmodem™, Xon/Xoff, 
X-Modem, Modem-7 


mm PACK 4: Building Blocks Il $149 
Dates, Textwindows, Menus, 
Data Compression, Graphics 


$399 


my PACK 5: Mathematics | $99 
Log, Trig, Random, 
Std Deviation 

my PACK 6: Utilities | $99 


(EXE files) 

Arc, Diff, Replace, Scan, Wipe 
‘Master Card/Visa, $7 Shipping, Mass. Sales Tax 5% 

ASK FOR FREE DEMO DISKETTE 


NOVUM HE SOFTWARE 
ORGANUM HORIZONS 
INC. @ inc. 
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44 Mall Rd., Burlington, MA 01803 
(617) 273-4711 


Circle no. 262 on reader service card. 


C CHEST 


Listing One (Text begins on page 18.) 


#include <stdio.h> 
#include <dos.h> 


#define NUMROWS 25 
#define NUMCOLS 80 
#define VIDBASE OxbO0000000 /* Base address of video screen 
* in canonical form. 
a 
#define NORMAL 0x07 /* Basic Attributes. Only one */ 
#define UNDERLINED 0x01 /* of these may be present. x] 
#define REVERSE 0x70 
#define BLINKING 0x80 /* May be ORed with the above */ 
#define BOLD 0x08 /* and with each other */ 
/* cl cI a i A aan cee cee Me agement ac clea Tig to sac ests We ccc ins ebb ng tlc gh ca Tn et ae a a x/ 
typedef struct 
{ 
char letter; 
char attribute; 
} 
CHARACTER; 
typedef CHARACTER DISPLAY [ NUMROWS ][ NUMCOLS ]; 
static DISPLAY far *Screen = (DISPLAY far *) VIDBASE; 
/* ac er ce aie a ei i ec pc a tec ic ips iene el tai cel can cde esto gh ces Zinta Mia oe dca ener ails x / 
static int Row = 0 
static int Col = 0 
/* ead csc Dg ce el gus Sad a cl gO ais“ ess i ll eg ccd cals ies wis ov edgy cant sc es et we en cos i ts ssa ein ng wilh ini x / 
static void fix cur () 
{ 
{* Direct video writes won't actually move the cursor 
* so we'll do that with a ROM-BIOS call. move cur 
* puts the cursor at Row, Col. 
*/ 
union REGS Regs; 
Regs.h.dh = Row; 
Regs.h.dl = Col; 
Regs.h.bh = 0 ; /* Use “active" video page ¥/ 
Regs.h.ah = 2 ; /* Function 2, set cursor position */ 
int86( 0x10, &Regs, &Regs); /* Video int *f 
} 
/* i a a a al a he a a el gwen gn eae en debacle lsc ll wkd inane wi ener cp img ch Sem gel em i apa an x/ 
void setcur( row, col ) 
{ 
Row = row; 
Col = col; 
fix _cur(); 
} 
/* a stn omen pei ur Ws wc i nig pia as aN nec ie cs Niel lt iS en Apc el wy nol cn i Sek en ei is ta inh nic cs gn wg cect arg Sg eats x / 
void getcur( rowp, colp ) 
int *rowp, *colp; 
{ 
*rowp = Row; 
*colp = Col; 
} 
I Ra a eae atl arches lo Santillan eit gata lee tea alah ion Oe dg ot Ns se ha * / 
void d_ putc( c,. attrib ) 
{ 
Switch( c ) 
{ 
case '\r': Col = 0; 
break; 
case ‘\n': if ( ++Row >= NUMROWS ) 
Row = 0; 
break; 
case '\b': if( --Col < 0 ) 
Col = 0; 
break; 
default: 
(*Screen) [ Row ][ Col ].letter =c : 
(*Screen) [ Row ][ Col ].attribute = attrib ; 
if( ++Col >= NUMCOLS ) 
{ 
Col = 0; 
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93 if ( ++Row >= NUMROWS ) 





94 Row = 0; 
95 } 
96 break; 
97 } 
98 
99 fix _cur(); 
100 } 
101 
102 /*---------------------------------------------------------------------- */ 
103 
104 void d puts( str, attrib } 
105 register char *str; 
106 register int attrib; 
107 { 
108 while( *str ) 
109 d putc( *str++, attrib ); 
110 } 
111 
112 /*----------------------------------------------------------------------*/ 
113 
114 void clrs( attrib) ' 
115 { 
116 /* Clears the screen. The cursor is not moved. 
iy */ 
118 
119 CHARACTER far *p = (CHARACTER *)VIDBASE ; 
120 register int 1-2 
121 
122 for ( i = NUMROWS * NUMCOLS; --i >= 0; ) 
123 { 
124 (p )->letter ob E |? Se 
125 (p++) -—>attribute = attrib ; 
126 } 
427°} 
128 
129 /*--------------- -- -- - -- -  / 
130 Number One 
132 { 5 
133 clrs ( NORMAL ); in Performance 
134 setcur(. 0,- 0 -}F 
135 
136 d_puts ("Normal\n\r", NORMAL ); 0 
is) d puts ("Normal blinking\n\r", NORMAL | BLINKING +? 
138 d puts ("Reverse\n\r", REVERSE iB 
139 buts Under] inea\m\c", ONDERLINED t Coprocessor for 
140 d puts ("Underlined bold\n\r", UNDERLINED | BOLD re 
141 ioe ("Underlined blinking bold\n\r", UNDERLINED|BOLD| BLINKING) ; IBM/ AT/ XT / PC- 
142 
143 | exit (0); 8/10/12.5mz No Wait States 
ite $ 
End Listing One 1 295° Oty. 1 
ase FEATURES 
Listing TWO e 1-2 MB RAM (1MB Standard) 
© 16K-64K EPROM 
e 2-8 Serial Ports 
| =o , Async/Sync/Bisync Communications 
* Exit status == 0 if SHLEV environment exists, else e Battery-backed Real Time Clock 
| 3 Ht status ie 1 e Battery-backed 2K-8K RAM 
| */ | e 2 Parallel Ports 
| | © 68881 Math Coprocessor 
| exit ( getenv("SHLEV") = 0 ); | e Memory-mapped Dual-port BUS 
| } | e 3-9 Users Per Board (3 Standard) 
| | © Up To 16 Boards Per AT/XT/PC 
e Can Operate As Standalone Processor 
sha | SOFTWARE 
End Listing Two ¢ 0S9 (Powerful UNIX-like Multi-user 0S) 
e CPM/68K 
e Software selectable OS including concurrent 
PC DOS/0S-9 or CPM/68K operation 
LISTING TH REE e Support Module for IBM Graphics 
e High-speed Local/Global Disk Caching 
© Basic, Pascal, Fortran, C, and COBOL 
# 
shlev 


if( $status ) then TL S t 
setenv SHLEV 1 YS el IS 
else Sop RT RENT ST 
setenv SHLEV "‘expr SSHLEV + 1*" 
endif 
= 


set prompt="(SSHLEV,!] " 


————————-——+-—+ 


| West: 4704 W. Jennifer, Suite 105, Fresno, CA 93711, 209/276-2345 
East: 67 Grandview, Pleasantville, NY 10570, 914/747-1450 
Distributor: Telemarketing Services, Inc. 


isti a _ OR 97403, 503/345-7395 
End Listings 1897 Garden Ave., Eugene 
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Put More 
UNIX” in 
Your C. 


BR: a HK : 
m 

Unitools $99 i . 
MAKE, DIFF and GREP S$ VW 
These versatile UNI X-style utilities put 
power at your fingertips. MAKE, a 
program administrative tool, is like 
having an assistant programmer at your 
side. DIFF compares files and shows 
you the differences between them. 


Listing One (Text begins on page 42.) 


i 


FR ee ae Cob; ee 


~ 


#include <stdio.h> 


SINE.C 


Plot sin(x) vs. 
an IBM enhanced graphics adapter in the high resolution mode. 
Purpose is to test the video routines. 


#include <math.h> 


xX On an enhanced color display with 


by Nabajyoti Barkakati, Silver Spring, MD 20904. 








GREP can search one or many files #define BLUE 1 /* Color number 1 is BLUE */ 
#define RED 4 /* Color number 4 is RED a) 

looking for one pattern or a host of #define BOTTOM 4 /* Bottom margin a 

patterns. #define TOP 345 /* Top margin ay 
#define LEFT 4 /* Left margin */ 
#define RIGHT 635 /* Right margin “7 
#define TWOPI 6.283 /* Approximate value of 2 Pi */ 
#define MAXPNT 100 /* Points on the sinusoid a] 

“Z $99 main() 

vi?’ { 

A Powerful “vi’-type Editor: int i, x, y, oldx, oldy, midpoint; 

Similar to the Betkeley: ‘vi’ editor, double xd, yd, ampl; 

“Zs” commands are flexible, terse, v_init (RED); /* Initialize the display x / 


and powerful; macro functions give you 


imi ' idpoint = (TOP - BOTTOM) /2; 
unlimited range. Features include a oem ( ) 





ampl = (double)midpoint - (double) BOTTOM; 
“undo,” sophisticated search and re- 
. a kg . oldx = LEFT; 
place functions, automatic indentation, eldy = migoolnt: 
C-tags, and much, much more. : ; 
re for (i=0; i<=MAXPNT; i++) 
‘ { 
yd = ampl * sin(TWOPI * ((double)i)/( (double) MAXPNT) ); 
xd = ((double)RIGHT - (double)LEFT)* (double)i / (double) MAXPNT; 
PC- LINT $99 x = LEFT + (int) xd; 
y = midpoint + (int) yd; 
Error Checking Utility ea /* Draw a line from the old point to the new point */ 
A LINT-like utility that nen pro- 


grams and uncovers bugs, quirks and V_SEEN, AG SANs Be ¥.: BLUE 2 


inconsistencies. Detects subtle errors. 
Supports large and small memory mod- 
els, has clear error messages and 
executes quickly. Has lots of options } 

and features that you wouldn’t expect /* Draw a box around the plot */ 
at this low price. 


/* Save the new coordinates */ 


oldx = x; 
oldy = y; 


v_draw (LEFT, BOTTOM, RIGHT, BOTTOM, BLUE); 
v_draw (RIGHT, BOTTOM, RIGHT, TOP, BLUE); 
v_draw (RIGHT, TOP, LEFT, TOP, BLUE); 
v_draw (LEFT, TOP, LEFT, BOTTOM, BLUE); 


/* Done */ 


} 


SunScreen $99 
Low-priced Screen Utility 
This versatile graphics ee oa 
creates and modifies formatted screens, 
validates fields, supports function keys, 





. . En e 2 
color and monochrome cards. With li- d Listing One 
brary source SunScreen is $199. 

Compatible with all leading MS/ 
PC-DOS C compilers. Listing Two 
/* 
*  VIDEO.C 
SPECIAL OFFER: * 
Unitools, <a * This file contains the video display modules. Uses the int86 
* function of Lattice C 2.14 to draw graphs on an enhanced color 
PC-LINT and Sun- * display with the IBM enhanced graphics adapter. 
Screen All for only eae 
* by N. Barkakati, Silver Spring, MD 20904. 
* 
f/f 
#include <dos.h> 
#define void int 
#define EGAMODE 16 /* EGA in high resolution +7 
To order or for information call: #define MAXROW 24 
#define MAXCOL 79 
#define MAXYDOT 349 /* Max. columns and rows on x/ 
#define MAXXDOT 639 /* enhanced color display */ 
#define BIOS VIDEO 16 /* BIOS Video service int. no. */ 
#define SETMODE 0 /* Service: set video mode mae 
#define SETCOLOR 11 /* Service: set color pallette */ 
#define WRITE PIX 12 /* Service: write pixel */ 
]. 800-TEC. WARF static union REGS xr,yr; /* See dos.h for explanation x/ 


(In NJ call 201-530-6307) (s - yt 


~ 


* Initialize the display. Put it in EGA hi- -resolution mode. 


* Set background color. 


NIX isa tered TM of Bell Laboratones. MANX AZTEC TM Manx Software Systems. In 
LIN? T™ GIMPLE software. SunScreen TM SunTec. MS-DOS TM Microsoft 
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x 

me 
void v_init (bgcolor) 
int bgcolor; 


{ 
/* ROM BIOS Video functions -- mode 16 is EGA in high-resolution 
* (640x350 pixels) 
~ 
xr.h.ah = SETMODE; 
xr.h.al = EGAMODE; 
int86 (BIOS_VIDEO, &xr, &yr); 


/* "Set. cGlor. 
xr.h.ah = SETCOLOR; 
xr.h.bh = 0; 
xr.h.bl = bgcolor; 
int86 (BIOS_VIDEO, &xr, &yr); 


/* Done */ 


/* ee ee ee ee ee ww em ee ww ee ww wee ww ww wn wo wn oo nn a a a rr rn rr errr x / 
/* 
* vi_idraw 
x 
* Draw a line of specified color between the two points (x1,y1l) 
* and (x2,y2). Uses Bresenham's Algorithm described in: 
* J.D. Foley and A. Van Dam, FUNDAMENTALS OF INTERACTIVE 
* COMPUTER GRAPHICS, Addison-Wesley, 1982, pp.433-435. 
x 
af 
void v_draw(xl, yl, x2, y2, color) 
int «i, yi,..%2, y2< color; 
{ 
int dx, dy, incrl, incr2, incr3, d, x, y, xend, yend; 
dx = abs (x2-x1); 
dy = abs(y2-yl); 
if (dy<=dx) 
{ /* Absolute value of slope of line is less than 1 */ 
if (x1>x2) 
{ /* Start at point with smaller x coordinate */ 
xX = x2; 
y = y2; 
xend = xl; 
dy = yl-y2; 
} 
else 
{ 
X= xls .# 
y= wag 
xend = x2; 
dy = y2-yl; 


} 

ad = 2*dy-dx; 

incrl = 2*dy; 

incr2 = 2* (dy-dx); 
incr3 = 2* (dyt+dx); 
putdot (x, y, color); 
while (x < xend) 

{ 


x += 1; 
if (d >= 0) 
{ 
if (dy<=0) 
{ /* Negative or zero slope 
d += incrl; 
} 
else 
{ /* Positive slope 
y += 1; 
d += incr2; 
} 
} 
else 


if (dy>=0) 
{ /* Negative or zero slope 
d += incrl; 


} 


else 
{ /* Positive slope 
y = 1; 
d += incr3; 
} 
} 
putdot (x, y, color); 
} /* end while 
} /* end if 
else /* Absolute value of slope is greater than 1 
{ 
if (yl>y2) 
{ /* Start with point with samller y coordinate 
Y= ¥e? 
x = x2; 
yend = yl; 
dx = x1-x2; 
} 
else 
{ 
y= yl; 
x = xl; 
yend = y2; 


} 

dad = 2*dx-dy; 

incrl = 2*dx; 

incr2 = 2* (dx-dy); 
incr3 = 2* (dx+dy); 
putdot (x, y, color); 
while (y < yend) 

{ 


(continued on page 77) 
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Number One 
In Performance 


Hard Disk 
intelligent 


VCR Backup 
for AT/XT/PC 


FEATURES 


e High speed microprocessor 
controlled backup (68000) 
e Two channel interface 


e Built in LAN channel 
e Software control of most VCR 
functions including Fast Forward, 


Rewind, and auto backup using VCR 
timer capabilities 


e Economical VHS or Beta formats 


TLM Systems 


West: 4704 W. Jennifer, Suite 105, Fresno, CA 93711, 209/276-2345 
East: 67 Grandview, Pleasantville, NY 10570, 914/747-1450 
Distributor: Telemarketing Services, Inc. 

1897 Garden Ave., Eugene, OR 97403, 503/345-7395 
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How can you stay 
on the cutting edge of software 
ment...for 


6¢ a day? 


develo 





JOURNAL OF PASCAL, 
ADA & MODULA-2 


Editor: Dr. Richard S. Wiener, University 
of Colorado, Colorado Springs, Colorado 


System programming... graphics... 
numerical computing. . . operating sys- 
tems. . . artificial intelligence . . . com- 
puter-aided instruction . . .embedded 
real-time systems. . . discrete-event 
simulation . . . 


Just a part of today’s tremendous excite- 
ment in computer science and software 
development. 


And just a part of the many challenging 
areas explored by JOURNAL OF 
PASCAL, ADA & MODULA-2. 


Within its pages, you'll find informative, 
peer-reviewed articles on the advanced 
capabilities of these three languages, 
written by top academic researchers and 
software development practitioners from 
government and large and small compa- 
nies. You'll benefit from: 


@ new insights into the broader issues of 
the software development process in 
such articles as Modular Software 
Construction and Object-Oriented 


compliments. 


airmail delivery. 


Check one: () Individual $20 
LJ Institution $48 


_] Payment enclosed (U.S. currency only). 
_) Bill me. 


; Charge to my: () MasterCard 


Ce eee 


LJ) VISA 
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as little a 


Mail to: John Wiley & Sons, Subscription Dept. 6-0507 
605 Third Avenue, New York, NY. 10158 


YES! Please send me the JOURNAL OF PASCAL, ADA & 
MODULA-2 (ISSN 0735-1232), one full year of six bimonthly issues 
at the price listed below. | understand that if !am not completely 
Satisfied with my first issue, | can cancel my subscription and 
receive a complete 100% refund. | keep my first issue, with Wiley’s 


Outside U.S. add $19 for surface postage & handling, or add $37 for 





Design Using Ada and Modular Soft- 
ware Construction and Object- 
Oriented Design Using Modula-2. 


@ FREE utilities like A Pascal Factor 
Analysis Program and Dynamic Mul- 
tidimensional Arrays, which offer inter- 
esting solutions and effective ap- 
proaches to common programming 
and design problems. 


l@ fresh solutions to graphics programs 
and new ideas you can use yourself, 
including Real World and Standard - 
ized Graphics for Microcomputers 
and Pascal Graphics Routines for the 
Anderson Jacobson 232. 


@ in-depth articles on the latest software 
systems such as VMS Modula-2 
Compiler Reviewed. 


@ detailed implementation reports such 
as Seven Modula-2 Compilers 
Reviewed and Using JANUS Aaa. 


Plus critical reviews of the latest literature, 
a reader's forum, and a directory of up- 
coming seminars, conferences and 
educational opportunities. 


Card # 
Signature 
Name 
Company 
Address 
City/State/Zip 


Service begins upon receipt of payment. 


For faster service call TOLL-FREE 1-800-526-5368. In New 


Jersey call collect 201-342-6707. 
|] American Express 
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S0OMAR APR VGB_ ANG 2, SBS 


JOURNAL OF 


PASCAL, ADA 
MODULA-2 


IMPORTANCE OF BUILDING TOOLS 


ADA SOFTWARE ENGINEERING EXAMPLES 
MODULA-2 °C LIBRARY PROPOSA! 


PUBL SRED 6 SH WLET @ BLOW 
ARS RESET IE ARIE 





All for as little as 6¢ a day 


Individual subscribers to the JOURNAL 
OF PASCAL, ADA & MODULA-2 pay 
only $20 per year for six bimonthly issues 
—acost of just 6¢ a day. Asmall price to 
pay for so much news on the latest devel- 
opments that are important to you, your 
work, your profession. 


Subscribe today! 


Simply complete and mail the attached 
order form. Or call TOLL-FREE 
1-800-526-5638. In New Jersey call 
collect 201-342-6707. 


John Wiley & Sons 
605 Third Avenue 
New York, NY. 10158 


ORDER FORM Se eee ne eee 


Exp. Date 


6-0990 


Sec ines ei ces nes etna st es 





Listing Two (Listing continued, text begins on page 42.) 


y t= 1; 
if(d >= 0) 
{ 
if (dx <= 0) 


{ /* Negative or zero slope */ 


d += incrl; 

} 

else 

{ /* Positive slope */ 
x += 1; 
d += incr2; 

} 

} 


else 


if (dx >= 0) 

{ /* Negative or zero slope */ 
d += incrl; 

else 


{ /* Positive slope */ 
x -= 1; 
d += incr3; 

} 


} 
putdot (x, y, color); 








} /* end while */ 
} /* end else */ 
/* Done */ 
} 
/*-n----------------------------------------------------------------- x / 
/* 
e pret. do -c 
x 
* Put a dot of specified color at location (x,y) on screen. RE b O 
* Check if dot coordinates are within screen bounds. um er ne 
x 
a 
: oe in rmance 
* Convention: | | Origin at lower left corner of screen. 
. | | 
* (0,0)->| | x axis 
® 
*/ 


void putdot(x, y, color) 
int x,y; color; 
{ 
if ( x<0O | x>MAXXDOT | y<0O | y>MAXYDOT ) return; 





xr.x.dx = MAXYDOT - y; 
xr.X.CX = X; 


xr.h.ah = WRITE PIX; | IBM/AT/XT/PC- 8mz 
h.al = color; 


xr. 
int86 (BIOS VIDEO, &xr, &yr); 


ea No Wait States 


| FEATURES 


© 64K-256K RAM 
e 2K-8K EPROM/ Static Ram 
e 2 Serial Ports 
Async/Sync/Bisync Communications 
e Real Time Clock 
e Memory-mapped Dual-port BUS 
e On-board/Remote Reset NMi capability 
e Up To 32 Boards Per AT/XT/PC 
e Can Operate As Standalone Processor 


a e Less Than Full Size Board 
a (will fit other compatables.) 
SOFTWARE 


e ZP/Mtm CP/M Emulation Software 
(Supports Most CP/M Software) 

e Multiuser Capability if Used As A 
Slave Processor 


IBM ts a registered trademark of intermational Business Machines 
CPM /801s a registered trademark of Digital Research Corp 


TLM Systems _ 


West: 4704 W. Jennifer, Suite 105, Fresno, CA 93711, 209/276-2345 
East: 67 Grandview, Pleasantville, NY 10570, 914/747-1450 
Distributor: Telemarketing Services, Inc. 

1897 Garden Ave., Eugene, OR 97403, 503/345-7395 


Circle no. 174 on reader service card. 


Dr. Dobb’s Journal, May 1986 sy 








helps save time, money and cut frustrations. Compare, evaluate, and find products. 


¢ Programmer’s Referral List 
¢ Compare Products 

* Help find a Publisher * Rush Order 

¢ Evaluation LiteratureFREE + Over 700 products 
* BULLETIN BOARD - 7PM to 7AM 617-826-4086 


Ai-Expert System Dev’t 


Arity System - incorporate with C 
programs, rule & inheritance PC $295 
ExpertEASE - Develop by describing 
examples of how you decide. MS $595 
EXSYS - Improved. Debug, file & 
external program access. MS $339 


* Dealer’s Inquire 
* Newsletter 


Ist Class - by example, interfaces $250 
Insight 1 - probabilities, fast MS $ 79 
Insight 2 - dB2, language. MS $399 


Others: APES ($359), Advisor ($949), 
ES Construction ($100), ESP ($845), 
Experteach ($399), Expert Choice ($449) 


GC LISP Interpreter - “Common”, 

rich. Interactive tutorial $495 Call 
GC LISP 286 Developer - 2 to 15 meg 

RAM, compiler & interp. $1195 Call 
Microsoft MuLisp 85 $250 $199 
TLC LISP - “LISP-Machine” - 

like, all RAM, classes, compiler. MS $225 
TransLISP - learn fast MS $ 75 
WALTZLISP - “FRANZ LISP” - 

like, big nums, debug, CPM-80 MS $149 
Others: IQ LISP ($155), BYSO ($125) 
UNX LISP ($59), IQC LISP ($269) 


Al-PROLOG 


ARITY Standard - full, 4 Meg 
Interpreter - debug, C, ASM PC $ 350 
COMPILER/Interpreter-EXE PC $ 795 
With Exp Sys, Screen - KIT PC $1250 


List Our 


MicroProlog - enhanced MS $ 229 
MProlog - Improved, Faster PC $ 475 
Professional MicroProlog MS $ 359 


Prolog-86 - Learn Fast, Standard, 

tutorials, samples MS $ 95 
TURBO PROLOG by Borland PC $ 85 
Others: Prolog-I ($365), Prolog-2 ($1795) 


AI-OTHER 


METHODS - SMALLTALK has 

objects, windows, more PC $215 
QNIAL - Combines APL with LISP. 

Library of sample programs 

included. Source or binary. PC .1$375 
SNOBOL4 + -great forstrings. MS $ 85 


FEATURES 


Dan Bricklin’s Demo Program 
Prototype quickly. User feedback 
without programming. All 250 
ASC characters plus attributes. 
Subsetting, macros. PCS 75 

C Worthy Library - Complete 
approach, library for applications. 
Machine independent; network compatible, 
Source, no royalties, for Lattice MS $295 
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Free Literature - Compare Products 


Evaluate products. Compare competitors. Leam about new alterna- 
tives. One free call brings information on just about any programming 


need. Ask for any “Packet” or Addon Packet |] AI] ADA. Modula 
LIBASIC L}C’ LICOBOL [JEditorss LJFORTH [JFORTRAN 
LIPASCAL [JUNIX/PC or[_JDebuggers, Linkers 





ACTIVE TRACE, DEBUGGER - 
BASICA, MBASIC, interactive, 
well liked MS $ 79 
APC MegaBASIC - powerful PC $339 
BASIC DEVELOPMENT SYSTEM - 
(BDS) for BASICA; Adds Renum. 


crossref, compress. PC $105 
Basic Window PC $ 95 
BetterBASIC all RAM, modules, 

structure. Full BASICA PC $169 
8087 Math Support PC $ 89 
Run-time module PC. S235 
CADSAM FILE SYSTEM - full 

ISAM in MBASIC source. MS $ 75 
Data Manager - full source MS $325 
InfoREPORTER - multiple PC. $115 


PC/BASIC for Macintosh - by 
Pterodactyl. Compiles IBM BASICA, 


and MS BASIC for MAC syntax. $250 
Prof. Basic - Interactive, debug PC $ 85 

8087 Math Support Pe’ S175 
QuickBASIC by Microsoft - Compiles 

full IBM BASICA, 640K PC $79 
TRUE Basic - ANSI PC $119 

Run-time Module PC $459 
Macintosh COBOL - full MAC $459 
MBP - Lev. II, native MS $885 
MicroFocus Prof. - full PC Call 
Microsoft Version II - upgraded. 

Full Lev. II, native, screens. MS $495 
Realia - very fast MS $929 
Ryan McFarland - portable MS $699 
BRIEF Programmer's Editor - undo, 

windows, reconfigure PC Call 
C Screen with source 80/86 $ 75 


EMACS by UniPress - powerful, 
multifile, windows, DOS, MLISP, 
programming. Source:$949 $299 

Entry Systems for C PC $325 

Epsilon - like EMACS, full C-like 
language for macros. 

FirsTime by Spruce - Improve 
productivity. Syntax directed for 
Turbo ($69), Pascal ($229), or C ($239) 

Kedit - like XEDIT re. SIS 

Lattice Screen Editor - multiwindow, 


PC $169 


multitasking Amiga $100 
MS $125 

PMATE - power, multitask 80/86 $159 

VEDIT - well liked, macros, 

buffers, CPM-80-86. MS PC $119 

XTC - multitasking PC $ 85 


ATARIST & AMIGA 


We carry full lines of Manx, 
Lattice, Metacompo & Prospero. 


| RECENT DISCOVERIES 


dBASE Tools for C - incorporate 
C functions as extensions to 
dBASE III Plus. Also functions 
for business graphics, arrays, 
math, statistics. MS C, Lattice 
Aztec, PC Graphics $ 79 


C Language-Compilers Ba Kca Nate, 
AZTEC C86 - Commercial PC 5399 


AZTEC C85 - Personal Apple II $199 
C86 by CI - 8087, reliable MS $299 
Consulair Mac C w/toolkit MAC $299 
Lattice C - from Lifeboat MS $289 
Lattice C - from Lattice MS $339 
Mark Williams - w/debugger MS $399 
Megamax - tight full ATARI/ST $179 
Microsoft C 3.0 - new MS $259 
Q/C 88 by Code Works - Compiler 

source, decent code, native MS $125 
Wizard C - Lattice C compatible, 

full sys. III, lint, fast. MS $389 
C-terp by Gimpel - fullK &R, 

-OBJ and ASM, large progs. MS $249 
H.E.L.P. - innovative env. MS $ 90 
INSTANT C - Source debug, 

Edit to Run-3 seconds MS $399 
Interactive C by IMPACC Assoc. 

Interpreter, editor, source, debug. PC $225 
Introducing C - self paced tutorial PC $109 
Professional Run/C - Run/C plus 

create add-in libraries, load/ 

unload them. MS $199 
Run/C - improved MS $109 


C Libraries-General 


Application Programming Toolkit MS $375 
Blaise C Tools | ($109), C Tools 2 $ 89 
C Food by Lattice-ask for source MS $109 
C Utilities by Essential - Comprehensive 
screen graphics, strings, source. PC $139 
Entelekon C Function Library PC $119 
Entelekon Superfonts for C PC $ 45 
Greenleaf Functions - portable, ASM $139 
Polytron - for Lattice, ASM source $ 85 
Software Horizons - Pack | PC $129 


C Libraries-Communications 


Asynch by Blaise PC $149 
Greenleaf - full, fast PC $139 
Software Horizons - Pack 3 PC $119 


C Libraries-Files 


FILES: C Index by Trio - full B + 
Tree, vary length field, multi compiler 


/File is object only MS $ 89 
/Pro is partial source MS $179 
/Plus is full source MS $349 
C to dBase - with source MS $139 
C-Tree by Faircom MS $339 


CBTREE - multiuser record locking, 
sequential, source, no royalties MS $99 
dbc Isam by Lattice MS $199 
dbVISTA - full indexing, plus optional 
record types, pointers, Network. 
Object only - MS C, LAT, C86 $159 
Source - Single user MS $429 
Source - Multiuser MS $849 





THE PROGRAMMER’S SHOP 


Te 


provides complete information, advice, guarantees and every product for Microcomputer Programming. 


We support MSDOS (not just compatibles) 
PCDOS, Xenix-86, CPM-80, Macintosh, 
Atari ST, and Amiga. 


C Support-Systems 


Basic C Library by C Source PC $139 
C Debug - Source debuggers - by 
Complete Soft ($269), MSD ($149). 


CPRINT - by ENSCO MS $ 45 
C Sharp - well supported. Source, 
realtime, tasks MS $600 
C ToolSet- DIFF, xref, source MS $135 
Lattice Text Utilities MS $105 
The HAMMER by OES Systems PC $179 
PC LINT - Checker MS $125 


SECURITY LIB - add encrypt to MSC. 
C86 programs. Source $250 PC $125 


C-Screens, Windows, Graphics 


Curses by Lattice PC $109 
C Power Windows by Entelekon PC $119 
C Windows by Syscom PC $ 89 
ESSENTIAL GRAPHICS - fast, 

fonts, no royalties PC $219 
GraphiC - source in C PC $219 


Topview Toolbasket by Lattice PC $209 
View Manager for C by Blaise PC $219 
Windows for C - fast PC $149 
Windows for Data - validation PC $259 


DEBUGGERS 


Advanced Trace-86 by Morgan 


Modify ASM code on fly. PC $149 
CODESMITH - visual, modify 

and rewrite Assembler PC $129 
C SPRITE - data structures PC $149 
Periscope I - own 16K PC $269 
Periscope II - symbolic, “Reset 

Box,” 2 Screen PC $129 
Pfix-86 Plus Symbolic Debugger 

by Phoenix - windows PC $289 


Software Source by Atron - 
Lattice, MS C, Pascal, Windows 
single step, 2 screen, log file. MS $115 
w/Breakswitch $199 


Features 


Panel Screen Generator - Create 
screen with editor, generates 
code. Full data validation, 
windows, no royalties. Specify 
Lattice, MSC, C86, MS Fortran 
or Pascal MS $239 

Microsoft Cobol Tools - symbolic, 
windowing debugger w/source support. 
Plus cross reference. Menu Handler, 
mouse support. $310 











NEW HOURS 
8:30 AM - 8:00 PM EST. 








SERVICE: FREE NEWSLETTER 


Software development and Al on micros: trends, forecasts, controver- 


sles, Innovations, and techniques. Plus an announcement of 80 NEW 
tools. CALL for the "Newsletter Packet.” 





Fortran & Supporting 


ACS Time Series $469 
Forlib + by Alpha - graphics and 
file routines, Comm. MS $ 59 


MACFortran by Microsoft - full 

‘77 Includes ASM output MAC $229 
MS Fortran MS $219 
No Limit - Fortran Scientific © PC $129 
PolyFortran - xref, pp, screen MS $149 


Prospero - °66, reentrant MS $349 
RM Fortran - enhanced “IBM 

Professional Fortran” MS $399 
Scientific Subroutines - Matrix MS $149 
Statistician by Alpha MS $269 


Strings and Things - register, shell PC $ 59 


MultiLanguage Support 


BTRIEVE ISAM MS $199 
BTRIEVE/N-multiuser MS $469 
CODESIFTER - Execution PRO- 

FILER. Spot bottlenecks. 

Symbolic. automatic. MS $109 
MultiH ALO Graphics- Multiple 

video boards, printer, rich. 

Animation, engineering, business. 

Any MS language, Lattice, C86 PC $249 
PLINK 86 - a program-independent 

overlay linker to 32 levels. MS $279 
PLINK-86 PLUS - incremental MS $379 
Pfinish Performance Analyzer PC $279 
Profiler by DWB Associates MS $ 99 


PolyLibrarian MS $ 85 
PVCS Version Control MS $359 
Screen Sculptor - slick, thorough, 

fast, BASIC, PASCAL. PC $ 99 


ZAP Communications - VT 100, 
TEK 4010 emulation, fullxfer. PC $ 85 


TURBO PASCAL and SUPPORT 


BORLAND: Turbo 3.0 
3.0 with 8087 or BCD 
3.0 with 8087 and BCD 
Turbo Graphix - graphs, windows B icy 
Turbo Toolbox or Editor aS 


$ 49 
$ 
$ 
$ 
$ 
Turbo Tutor : 29 
$ 
$ 
$ 
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TURBO... Asynch by Blaise, full 85 
Power Tools by Blaise - library 85 
Power Utilities - profiler, pp 85 
Professional - interrupts, macros. 50 

OTHERS: Screen Sculptor ($99), 

Pascal Pac ($100), Tidy ($45). 


Call for a catalog, literature, advice and service you can trust 


800-421-8006 


THE PROGRAMMER’S SHOP™ 


128- D Rockland Street, Hanover, MA 02339 
Vass: 800-442-8070 or 617-826-7531 386 
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RECENT DISCOVERY 


dBrief, the dBASE Assistant - 
optional syntax directed editing, 
screen gen, graphics, speed coding. 


dBASE II, III, Clipper. PC $ 95 
OTHER LANGUAGES 
APL+/PC PC $469 
CLIPPER dBASE Compiler MS $449 
ED/ASM-86 by Oliver PC $ 85 


HS/FORTH -°79 & °83 Standards, 
fullRAM, ASM, BIOS, interrupts. 
Graph, multi-task, optimizer MS $250 

MacASM £- fast MS $ 99 

MasterForth by MicroMotion - floating 
point and relocator extensions 
available: Call MAC or PC $125 


Microsoft MASM - faster MS $109 
Microsoft PASCAL MS $199 
MODULA: M2SDS - popular PC $ 69 


MICROTEC PASCAL - for performance: 
extensions like packages, “Iterators”’, 
5 memory models. 65 bit 8087 strings. 


Space vs. speed MS $665 
PASM - by Phoenix MS $219 
Prospero Pascal - full ISO + MS $349 
RPG II by Lattice PC $675 


Turbo Edit/ASM - by Speedware PC $ 85 


XENIX-86 & SUPPORT 


Basic - by Microsoft $279 
Cobol - by Microsoft $795 
Fortran - by Microsoft $399 


PANEL Screen LIB - multi-language $539 
Xenix Complete Development System $985 


OTHER PRODUCTS 


dBASE to C Translator: dBx - 
no royalties, addon ISAM, 
Library Pioneer it MS $ 350 


Source $1000 


HTest/H Format - XT Fix PC 119 
Microsoft Windows PC: 75 
Opt Tech Sort- sort, merge MS 85 


Polymake by Polytron MS 85 

PS MAKE- Directly execute or Gen 
a batch file, batch, interactive. MS 

Qwik Net - critical path, 125 tasks 


$ 

$ 

$ 

$ 

$ 129 
resources, thorough; usable PC $ 316 

$ 

$ 

$ 

$ 


SECRET DISK by Lattice PC 49 
Se TcSscit MS $ 319 
SoftEst - Softwear Estimating 

and reporting. Pioneer it. MS $ 350 
Texsys - control source MS 89 


Visible Computer: 8088 - Simulates 
demos or any .exe. com, Debugger. 
350 pg. tutorial PC $59 


Note: All prices subject to change without notice. 
Mention this ad. Some prices are specials. Ask about 
COD and POs. All formats available. 


“It’s not often that I receive service from a 
company that I consider exceptional but 
you've managed to do it. . . | am impressed 
that you place the needs of your customers 
above making a “quick” profit and I hope 
to have the opportunity to do business with 
you again in the future... .” 

Samual Solon 
White Pine Software, Inc. 
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68K ASSEMBLER 


Listing Eleven (text begins on page 44.) 


IMPLEMENTATION MODULE LongNumbers; 
(* Routines to handle HEX digits for the xX68000 cross assembler. *) 
(* All but LongPut and LongWrite are limited to 8 digit numbers. *) 


FROM Files IMPORT 


FILE; 
IMPORT Files; (* Write *) 
IMPORT Terminal; (* Write *) 


(*--- 
(* These objects are declared in the DEFINITION MODULE *) 


CONST 
DIGITS = 8; 
BASE = 16; 
TYPE 
LONG = ARRAY [1..DIGITS] OF INTEGER; 


---*) 


CONST 
Zero = 308; 
Nine = 39H; 
hexA = 418; 
hexF = 46H; 


PROCEDURE LongClear (VAR A : LONG); 
(* Sets A to Zero *} 


VAR 
i : CARDINAL; 


BEGIN 


FOR i := 1 TO DIGITS DO 
A[i] := 0; 


END LongClear; 


PROCEDURE LongAdd (A, B : LONG; VAR Result : LONG); 
(* Add two LONGs, giving Result *) 


VAR 
Carry : INTEGER; 
i : CARDINAL; 


BEGIN 
Carry := 0; 
FOR i := 1 TO DIGITS DO 
Result[i] := (A[i] + Carry) + B[i]; 
IF Result[i] >= BASE THEN 
Result[(i]) := Result[i] - BASE; 
Carry := 1; 
ELSE 
Carry := 0; 
END; 
END; 
END LongAdd; 


PROCEDURE LongSub (A, B : LONG; VAR Result : LONG); 
(* Subtract two LONGs (A - B), giving Result *) 


VAR 
Borrow : INTEGER; 
i : CARDINAL; 


BEGIN 
Borrow := 0; 
FOR i := 1 TO DIGITS DO 
Result[{i] := (A[i] - Borrow) - B[i]; 
IF Result[i] < 0 THEN 
Result[i] := Result[i] + BASE; 
Borrow := 1; 
ELSE 
Borrow := 0; 
END; 
END; 
END LongSub; 


PROCEDURE CardToLong (n : CARDINAL; VAR A : LONG); 
(* Converts CARDINALs to LONGs *) 


VAR 
i : CARDINAL; 


BEGIN 
LongClear (A); 


End Listing Eleven 


Listing Twelve 


IMPLEMENTATION MODULE CmdLin2; 
(* Parses command line - returns pointer to an array of pointer to strings *) 


FROM SYSTEM IMPORT 
ADDRESS, ADR; 


CONST 
MAXARGS = 5; 


VAR 


CommandLine[80H] : ARRAY [0..7FH] OF CHAR; 
Arguments : ARRAY [0..MAXARGS -— 1] OF ADDRESS; 


PROCEDURE ReadCmdLin (VAR ArgC : CARDINAL; VAR ArgV : ADDRESS); 


(* Gives count of items in command line, and an array of pointer to them *) 


VAR 
i, C : CARDINAL; 
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BEGIN 
IF ORD (CommandLine[0]} = 0 THEN 


ArgC := 0; (* Nothing in Command Tail Buffer *) 
ArgV := NIL; 
ELSE 
i:=1; C := 0; 
LOOP 
WHILE CommandLine[i] = *' * DO (* Skip Blanks *) 
INC (i); 
END; 
IF CommandLine[i] = OC THEN (* end of tail buffer *} 
EXIT; 
ELSE 
Arguments[C] := ADR (CommandLine[i]); 
Inc (C}>; 
IF C = MAXARGS THEN 
EXIT; 
END; 
END; 
WHILE CommandLine[i] # °" * DO (* Advance to next Argument *) 
INC” (3) 2 
IF CommandLine[i}] = OC THEN 
EXIT; 
END; 
END; 


CommandLine[i] := 0C; 
INC. (i}> 
END; (* LOOP *) 


(* Terminate Argument *) 


CommandLine[0] := OC; 
ArgC := C; 
ArgV := ADR (Arguments); 
END; 
END ReadCmdLin; 


(* Command Tail must only be used once *} 


END CmdLin2. 


End Listing Twelve 


Listing Thirteen 


IMPLEMENTATION MODULE Parser; 
{* Reads the Source file, and splits each *) 
(* line into Label, OpCode & Operand(s). *) 


FROM Strings IMPORT 
STRING; 


FROM Files IMPORT 
FILE, EOF, Read; 


FROM ErrorX68 IMPORT 
ErrorType, Error; 


IMPORT ASCII; 


( Rice 
(* These objects are declared in the DEFINITION MODULE *) 
CONST 
TokenSize = 8; 
OperandSize = 20; 


TYPE 
TOKEN = ARRAY [0..TokenSize] OF CHAR; 
OPERAND = ARRAY [0..OperandSize] OF CHAR; 


VAR 
OpLoc, SrcLoc, DestLoc : CARDINAL; 
Line : STRING; 
LineCount : CARDINAL; 


(* location of line parts *) 


---*) 


PROCEDURE GetLine (f : FILE; VAR EndFile : BOOLEAN); 
(* Inputs a Line -- up to 80 characters ending in cr/lf -- from a file. *) 


CONST 
MAXLINE = 80; 
VAR 
i : CARDINAL; 
ch : CHAR; 


PROCEDURE Get (VAR c : CHAR) : CHAR; 
BEGIN 
IF NOT EOF (f} THEN 
Read (f, c)}; 
RETURN c; 
ELSE 
EndFile := TRUE; 
END; 
END Get; 


BEGIN (* GetLine *) 
EndFile := FALSE; 


i := 0; 

WHILE (i < MAXLINE) AND (Get (ch) # ASCII.1£) AND (NOT EndFile) DO 
Line[i] := ch; 
INC (i); 

END; 


IF Line[{i - 1] = ASCII.cr THEN 
Line[i - 1] := OC; 

ELSE 
Line[i] := 0c; 

END; 


(* Strip cr/lf - terminate with 0C *) 


INC (LineCount}); 
END GetLine; 


PROCEDURE SplitLine (VAR Label, OpCode : TOKEN; 


VAR SrcOp, DestOp : OPERAND); 
(* Separates TOKENs & OPERANDs from Line. =) 


(continued on page 82) 
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ow You Know 


RIEF is BEST 








“There is nothing this editor can’t do except make babies and 


I understand that’s in the next release.” 


The Program 


Editor with 
the BEST 
Features 


Since its introduction, 
BRIEF has been sweep- 
ing programmers off 
their feet. Why? 
Because BRIEF offers the 
features MOST ASKED 
FOR by professional 
programmers. In fact, 
BRIEF has just about 
every feature you've 
ever seen or imagined, 
including the ability to 
configure windows, 
keyboard assignments, 
and commands to 
YOUR preference. One 
reviewer (David Irwin, 
DATA BASED ADVISOR) 
put it most aptly, 
‘‘(BRIEF). . .is quite 
simply the best code 
editor I have seen.”’ 


Solution 


ystems” 





WINDOWS 


Brief does do windows, and it does them your way! 

You can split the screen horizontally and vertically 
multiple times, creating as many windows as will fit on 
the screen. Each window can show any part of any file. 

BRIEF’S flexible, easy to use windows make working 


with several files a breeze. 


“BRIEF’S windows are used very effectively... You 
can display as many windows as you can stand at one 


time.. 


. Movement between windows is easy, and data 


can be shipped between windows. You can even edit 
the same program in two windows at the same time.” 
“You have to see this to believe it.” 


Elliot Niman-C Journal, Fall 1985 





Every Feature You Can Imagine 


Compare these features 
with your editor (or any 
other for that matter). 
© FAST 
e Full UNDO (N Times) 

e Edit Multiple Large Files 

¢ Compiler-specific 
support, like auto 
indent, syntax check, 
compile within BRIEF, 
and template editing 

e Exit to DOS inside BRIEF 

e Uses all Available Memory 

e Tutorial 

e Repeat Keystroke 

Sequences 

15 Minute Learning Time 

e Windows (Tiled and 
Pop-up) 


e Unlimited File Size 
-(even 2 Meg!) 

e Reconfigurable Keyboard 

° Context Sensitive Help 

e Search for ‘‘regular 
expressions 


e Mnemonic Key 
Assignments 


e Horizontal Scrolling 

¢ Comprehensive Error 
Recovery 

e A Complete Compiled 
Programmable and 
Readable Macro Language 

e EGA and Large Display 
Support 

e Adjustable line length 
up to 512 


MONEY-BACK GUARANTEE 
Try BRIEF ($195) for 30 days — If not satisfied get a full refund. 


TO ORDER CALL (800-821-2492) 


SOLUTION SYSTEMS, 335-D WASHINGTON ST., NORWELL, MA 02061, 617-659-1571 


Circle no. 147 on reader service card. 


David Irwin, Data Based Advisor, 12/85 


Program Editing 
YOUR Way 


A typical program editor 
requires you to adjust 
your style of programming 
to its particular require- 
ments —- NOT SO WITH 
BRIEF. You can easily 
customize BRIEF to your 
way of doing things, 
making it a natural ex- 
tension of your mind. 
For example, you can 
create ANY command and 
assign it to ANY key - 
even basic function keys 
such as cursor-control 
keys or the return key. 


The Experts Agree 


Reviewers at BYTE, 
INFOWORLD, DATA 
BASED ADVISOR, and DR. 
DOBB’S JOURNAL all came 
to the same conclusion - 
BRIEF IS BEST! 

Further, of 20 top in- 
dustry experts who were 
given BRIEF to test, 15 
were so impressed they 
scrapped their existing 
editors! 


BRIEF is a trademark of UnderWare 






PC/VI 


Full Screen Editor for MS-DOS (PC-DOS) 


Looking for an Ultra-Powerful Full-Screen editor for 
your MS-DOS or PC-DOS system? Are you looking for an 
editor FULLY COMPATIBLE with the UNIX* VI editor. 
Are you looking for an editor which not only runs on 
IBM-PC’s and compatibles, but ANY MS-DOS system? Are 
you looking for an editor which provides power and flexi- 
bility for both programming and text editing? If you are, 
then look no further because PC/VI IS HERE! 


The following is only ahint of the power behind PC/VI: 
English-like syntax is command mode, mnemonic control 
sequences in visual mode; full undo capability; deletions, 
changes and cursor positioning on character, word, line, 


sentence, paragraph or global basis; editing of files larger 
than available memory; powerful pattern matching capa- 
bility for searches and substitutions; location marking; 
joining multiple lines; auto-indentation; word abbreviations 
and MUCH, MUCH MORE! 


The PC/VI editor is available for IBM-PC’s and generic 
MS-DOS based systems for only $149. For more infor- 
mation call or write: 


Custom Software Systems 
P.O. Box 551 MO 
Shrewsbury, MA 01545 
617-842-1712 
The UNIX community has been using the VI editor for 
years. Now you can run an implementation of the same 


editor under MS-DOS. Don’t miss out on the power of 
PC/VI! 


*UNIX is a trademark of AT&T Bell Laboratories. 
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CROSS ASSEMBLERS FOR 
MS-DOS SYSTEMS! 






Turn your IBM PC or compatible 
into a microprocessor 
development station 








Develop Code For: 
6800, 6801, 6805, 6809, 6502 


(Inquire about others) 







FAST - INEXPENSIVE! 


Only $4995 


(Calif. residents add 6.5% tax) 


STS ENTERPRISES 


5469 Arlene Way, Livermore, CA 94550 
Call (415) 455-5358 


(Sorry, no Credit Card orders) 
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Listing Thirteen 
(Listing continued, text begins on page 44.) 


CONST ‘ 
Quote = 47C; 
StringMAX = 12; 


VAR 
i, 4. : CARDINAL; 
ParCnt : INTEGER; (* Tracks open parentheses *) 
c : CHAR; 
InQuotes : BOOLEAN; 


PROCEDURE Cap (ch : CHAR) : CHAR; 
BEGIN 
IF InQuotes THEN 
RETURN (ch); 
ELSE 
RETURN CAP (ch); 
END; 
END Cap; 


PROCEDURE White (ch : CHAR) : BOOLEAN; 
BEGIN 
RETURN ((ch = ASCII.ht) OR (ch = ' ')); 
END White; 


PROCEDURE Delimiter (ch : CHAR) : BOOLEAN; 
BEGIN 
RETURN ((NOT InQuotes) AND 
((ch = ASCII.ht) OR (ch = * ') OR (ch = OC))); 
END Delimiter; 


PROCEDURE OpDelimiter (ch : CHAR) : BOOLEAN; 
BEGIN 
RETURN ((NOT InQuotes) AND (ch = ',"') AND (ParCnt = 0)); 
END OpDelimiter; 


PROCEDURE Done (ch : CHAR) : BOOLEAN; 
(* look for start of comment or NULL terminator *) 
' BEGIN 
RETURN ((ch = ';") OR (ch = OC) OR ((ch = '*') AND (i = 0))}; 
END Done; 


BEGIN (* SplitLine *)} 


InQuotes := FALSE; 


IF Done (Line[{i]) THEN {* look for blank or all-comment line *)} 
RETURN; 
END; 


IF White (Line[i]) THEN 
ING“ ¢2}< 


WHILE White (Line[i]}) DO 
ING (i}'; (* Skip spaces & tabs *) 
Ds: 


ELSE "(s Found a Label *) 
jis Os 
c := Line[i]; 
WHILE (NOT Delimiter (c)) AND (4 < TokenSize) DO 
Label[j] := CAP (c); 


INC (i); INC (3); 
ec := Line[i]}; 
END; 
Label[j]) := OC; {* terminate Label string *) 


IF j = TokenSize THEN 
Error (i, TooLong); 
END; 
WHILE NOT Delimiter (Line[i]})) DO 


INC (i); (* Skip remainder of Too-Long Token *) 

END; 

END; 

WHILE White (Line[i]) DO 
INC. 41) 5 

END; 

IF Done (Line[i]) THEN 
RETURN; 

ELSE (* Found an OpCode *) 
OpLoc := i; 
3 := 0; 


c := Line[i); 
WHILE (NOT Delimiter (c¢c)) AND (4 < TokenSize) DO 
OpCode[j] := CAP (c); 
INC (i); INC (3); 
c := Line[i]; 
END; 
OpCode[j] := OC; 
IF 3 = TokenSize THEN 
Error (i, TooLong); 
END; 
WHILE NOT Delimiter (Line[i]) DO 
INS fi}: (* Skip remainder of Too-Long Token *) 
END; 
END; 


WHILE White (Line[i}} DO 
INC (1) 
END; 


IF Done (Line[{i]) THEN 
RETURN; 
ELSE (* Found lst Operand *} 
SrceLoc := i; 
= O; 
ParCnt := 0; 
c := Line[{i); 
IF c = Quote THEN (* String Constant *) 
SrcOp[j3) := c; 
INC (i); INC (4); 
REPEAT 
c := Line[i]; 
SrcOp[j] := c; 
INC (i); INC (3)7 
UNTIL (c = Quote) OR (j > StringMAX) OR (c = OC); 
SrcOp[j] := 0c; 
IF 3} > StringMAX THEN 
Error (i, TooLong); 


END; 
RETURN; (* second operand not allowed after string constant *)} 
ELSE (* Normal Operand *) 


WHILE (NOT Delimiter (c) ) 
AND (NOT OpDelimiter (c)} 
AND (3 < OperandSize) DO 
IF c = Quote THEN 


(continued on page 84) 
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IBM PC XT Compatible, 4.77MHZ 
Clock, 640K Mother Board, 8088 
Intel Chip, Keyboard, 135 watt 
Power Supply, Floppy Disk Con- 
troller, Printer Port, Serial Port, 
Game Port, Clock w/Battery Back- 








up, Two Disk Drives...... $699. 
Specials * 
Floppy Disc Controller...... $29. 
Monochrome Graphics 
COOP eas cesc'ns bes tae 
Disk I/O Card FDC, PP/SP, 
Game, Battery Clock ...... 79. 


4200 Baud Modem (12 size). . 159 
XT-Mother Board “O’’K 


expandable to 640K....... 99. 
Mother Board for AT ...... 650. 
ROW Oe ass es o's ew 65. 


20MB Drive with Controller. . 425. 
Power Supply 135 watts ....65. 
Power Supply 200 watts ...129. 


ME CeSSS nT i Migs eects 
WEE RASSIG 5 oc a tae doe ows 89. 
8MHz IBM PC XT Compatible 
Mother Board “O’K ......175. 
Z30MB Drive with Controller. . 590. 
et PSs va ed a 275. 


AMERICAN MICRO TECHNOLOGY 
_presents 


STARRING 


| 

| 

: 
L 
) 





IBM PC AT Compatible Computer 
(STM Board) 6 MHz, 640K Memory, 
Keyboard, Clock & Battery on 
Board, Floppy & Hard Disk Con- 
troller, 1.2MB Floppy, 192 watts 
Power Supply .........$1499.* 


IBM PC AT Compatible Computer 
(Atronics Mother Board), 8 MHZ 
Clock (enhanced version), 640KB 
Memory expandable to 1MB, AT 
layout Keyboard, Floppy & Hard 
Disk Controller by Western Digital, 
192 watts Power Supply, 1.2MB 
Floppy, 20MB Hard Disk, Socket 
fOr SOPSF 8 iat we be ee: 


“O” Wait State Option ....$300. 


PLEASE DON’T CALL 
TICKETRON ... 

FOR FAST SERVICE 
CALL US 


(714) 972-2945 
TWX 5106003265 


and 
introducing 





= ==/r 

IBM PC Compatible, 2 to 5 times 
faster than IBM PC, Zero Wait 
State, Eight Slots. 135 watts Power 
Supply, 8 MHZ & 4.77 MHz Clock 
(Dual Soeed Hardware & Software 
switchable), 640KB on Mother 
Board, V-20 or 8088-2 Processor, 
AT layout Keyboard, Floppy Disk 
Controller, Two Drives 360KB each, 
Runs Lotus 123, Wordstar, dBase Il 
& il, Flight Simulator and 

Wi ee a ok .... $699" 


*Prices for quantity purchases only 
Registered trademark of IBM Corporation 


mage AMERICAN 
N A A ; MICRO 
TECHNOLOGY 


1322 E. EDINGER SANTA ANA, CA 92705 


Prices and Availability subject to change without notice. 
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Listing Thirteen (Listing continued, text begins on page 44.) 


InQuotes := NOT InQuotes; (* Toggle Switch *) 
END; 
IF NOT InQuotes THEN 
IF c = '(" THEN 
INC (ParCnt); 
END; 
IF c = ')' THEN 
DEC (ParCnt); 
END; 
END; 
SrcOp[j] := Cap (c); (* Switched CAP function *)} 
INC (i); INC (4); 
c := Line[i]; 
END; 
SrcOp[j] := OC; 
IF 3 = OperandSize THEN 
Error (i, TooLong); 
END; 
END; 
WHILE (NOT Delimiter (Line[i])}) AND (NOT OpDelimiter (Line[i])) DO 


INC. (2}% (* Skip remainder of Too-Long Operand * 
END; 


END; 


IF NOT OpDelimiter (Line[i])} THEN 
RETURN; (* because only one OPERAND *) 
ELSE (* Found 2nd Operand *) 
INC (i); (* Skip OpDelimiter (comma) *)} 
DestLoc := i; 
3 s= 0; 
c := Line[i]; 
WHILE (NOT Delimiter (c}} AND (4 < OperandSize)} DO 
DestOp[j] := CAP (c); 
INC (i); INC (3); 
c¢ := Line[i]; 
END; 
DestOp[j] := OC; 
IF 3 = OperandSize THEN 
Error (i, TooLong) ; 
END; 
END; 
END SplitLine; 


PROCEDURE LineParts (f : FILE; VAR EndFile : BOOLEAN; 
VAR Label, OpCode : TOKEN; 
VAR SrcOp, DestOp : OPERAND}); 
(* Reads line, breaks into tokens, on-passes to symbol & code generators *) 


BEGIN 
Line := ""; 


GetLine (f, EndFile); (* read a line from the file *) 


Label := ""; OpCode := ""; SrcOp f= Tt"; DestOp := ""; 
IF EndFile THEN 


Error (0, EndErr); 
ELSE 


SplitLine (Label, OpCode, SrcOp, DestOp); 
END; 


END LineParts; 


BEGIN (* MODULE Initialization *) 


OpLoc := 0; SrcLoc := 0; DestLoc := 0; LineCount := 0; 
END Parser. 


End Listing Thirteen 


Listing Fourteen 


IMPLEMENTATION MODULE SymbolTable; 


(* Initializes symbol table. Maintains list of all labels, *) 
(* along with their values. Provides access to the list. *) 


FROM LongNumbers IMPORT 
LONG, LongClear; 


FROM Parser IMPORT 
TOKEN; 


FROM Strings IMPORT 
CompareStr; 


CONST 
MAXSYM = 500; (* Maximum entries in Symbol Table *) 


TYPE 
SYMBOL = RECORD 
Name : TOKEN; 
Value : LONG; 
END; 


VAR 
SymTab : ARRAY [1..MAXSYM] OF SYMBOL; 


Next : CARDINAL; (* Array index into next entry in Symbol Table *) 
Top : INTEGER; (* Last used array position as seen by Sort *) 


PROCEDURE FillSymTab (Label : TOKEN; Value : LONG; VAR Full : BOOLEAN); 
(* Add a symbol to the table *) 
BEGIN 
IF Next <= MAXSYM THEN 
SymTab[Next].Name := Label; 
SymTab[Next].Value := Value; 
INC (Next); 
Full := FALSE; 
ELSE 
Full := TRUE; 
END; 
END FillSymTab; 


PROCEDURE SortSymTab (VAR NumSyms : CARDINAL); 
(* Sort symbols into alphabetical order *) 


VAR 


i, j, gap : INTEGER; {(* Shell Sort causes j to 


* 
Temp : SYMBOL; go negative *) 
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PROCEDURE Swap; 
BEGIN 
Temp := SymTab[4]; 
SymTab[j] := SymTab[j + gap]; 
SymTab[j + gap] := Temp; 
END Swap; 


BEGIN {* Sort *) 
Top := Next - 1; 


gap := (Top + 1) DIV 2; 
WHILE gap > 0 DO 
i := gap; 
WHILE i <= Top DO 
j := i - gap; 
WHILE j >= 1 DO 
IF CompareStr (SymTab[j].Name, SymTab[j + gap].Name) > 0 THEN 
Swap; 
END; 
J} 38 5° > Gapy 
END; 
INC (1) 2 
END; 
gap := gap DIV 2; 
END; 


NumSyms := Top; 
END SortSymTab; 


PROCEDURE ReadSymTab (LABEL : ARRAY OF CHAR; 

VAR Value : LONG; VAR Duplicate : BOOLEAN) : BOOLEAN; 
(* Passes Value of Label to calling program -- returns FALSE if the *) 
(* Label is not defined. Also checks for Multiply Defined Symbols *) 


CONST 
GoLower = -1; 
GoHigher = +1; 


VAR 
i, j, mid : INTEGER; 
Search : INTEGER; 
Found : BOOLEAN; 
G1: CHAR: 
Label : TOKEN; 


BEGIN 
LongClear (Value); 
Duplicate := FALSE; 


1 := 0; 
REPEAT 
c := LABEL[i]; 
Label[i] := c; 
INC (i); 
UNTIL (c = OC) OR (i > 8); 


IF c # OC THEN (* Operand label too long --> Undefined *) 
RETURN FALSE; 
END; 


4-sm 1? 
j := Top; 
Found := FALSE; 


REPEAT (* Binary search *) 
mid := (i + 4) DIV 2; 
Search := CompareStr (Label, SymTab [mid] .Name) ; 


IF Search = GoLower THEN 
j := mid - 1; 

ELSIF Search = GoHigher THEN 
1 := mid + 1; 

ELSE (* Got It! *) 
Found := TRUE; 


END; 
UNTIL (3 < i} OR Found; 


IF Found THEN 
IF mid > 1 THEN 
IF CompareStr (SymTab[mid].Name, SymTab[mid - 1].Name) = 0 THEN 
Duplicate := TRUE; (* Multiply Defined Symbol *) 
END; 
END; 
IF mid < Top THEN 


IF CompareStr (SymTab[mid].Name, SymTab[mid + 1].Name) = 0 THEN 
Duplicate := TRUE; (* Multiply Defined Symbol *)} 

END; 
END; 


Value := SymTab [mid] .Value; 
RETURN TRUE; 
ELSE 
RETURN FALSE; 
END; 
END ReadSymTab; 


PROCEDURE ListSymTab (i : CARDINAL; VAR Label : TOKEN; VAR Value : LONG); 
(* Returns the i-th item in the symbol table *) 
BEGIN 


IF i < Next THEN 
Label := SymTab[i].Name; 
Value := SymTab[i].Value; 


END; 
END ListSymTab; 


BEGIN (* MODULE Initialization *) 


FOR Next := 1 TO MAXSYM DO 
SymTab[Next].Name := ""; 
LongClear (SymTab [Next] .Value); 

END; 


Top := 0; 
Next := 1; 


END SymbolTable. 


End Listing Fourteen 


(Listing Fifteen begins on page 86.) 
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68K ASSEMBLER 


Listing FIff€en (Listing continued, text begins on page 44.) 


IMPLEMENTATION MODULE OperationCodes; 


(* Initializes lookup table for Mnemonic OpCodes. 
(* and returns the bit pattern along with address mode information. *) 


BEGIN 


Searches the table *} 
FROM Files IMPORT 
FILE, FileState, Open, ReadRec, Close; 


FROM Terminal IMPORT 
WriteString, WriteLn; 


FROM Strings IMPORT 
STRING, CompareStr; 


FROM Parser IMPORT 
TOKEN; 


FROM ErrorX68 IMPORT 
ErrorType, Error; 


CONST 
FIRST = 1; (* First 68000 OpCode *) 
LAST = 118; (* Last 68000 OpCode *) 


Wenn es 


(* These objects are declared in the DEFINITION MODULE *} 


TYPE 

ModeTypeA = (RegMem3, (* 0 = Register, 1 = Memory *) 
Ry02, (* Register Rx -- Bits 0-2 *} 
Rx911, (* Register Ry -- Bits 9-11 *} 
Data911, (* Immediate Data -- Bits 9-11 *)} 
CntR911, (* Count Register or Immediate Data *) 
Brnch, (* Relative Branch *)} 

DecBr, (* Decrement and Branch *} 
Data03, (* Used for VECT only *) 
Data07, (* MOVEQ *) 

OpM68D, (* Data *) 

OpM68A, (* Address *) 

OpM68C, (* Compare *) 

OpM68Xx, (* XOR *) 

OpM68S, (* Sign Extension *) 
OpM68R, (* Register/Memory *) 
OpM37) ; (* Exchange Registers *) 

ModeTypeB = (Bit811, (* BIT operations - bits 8/11 as switch *) 
Size67, (* 00 = Byte, 01 = Word, 10 = Long *} 
Sizeé, (* 0 = Word, 1 = Long *) 
$izel1213A, (* 01 = Byte, 11 = Word, 10 = Long *)} 
$ize1213, (* 11 = Word, 10 = Long *) 

Exten, (* OpCode extension required *) 
EAOSa, (* Effective Address - ALL *} 
EAOSb, (* Less 1 *) 

EAOSc, (*- Legs, 15-11%} 

EAOSd, (* Less 9, 10, 11 *) 

EAOSe, {*-Lese.1, (95--20; -21.*) 
EAOS£, {* Less 0; 15-33. 47037.) 
EAOSx, (* Dual mode — OR/AND *) 
EAOSy, (* Dual mode - ADD/SUB *) 
EAOSz, (* Dual mode - MOVEM *) 
EA611); (* Used only by MOVE *) 


ModeA = SET OF ModeTypeA; 
ModeB = SET OF ModeTypeB; 


---*) 
TYPE 
TableRecord = RECORD 
Mnemonic : TOKEN; 
Op : BITSET; 


AddrModeA : ModeA; 
AddrModeB : ModeB; 
END; 


VAR 
able68K : ARRAY [FIRST..LAST] OF TableRecord; 


T 
i : CARDINAL; (* index variable for initializing Table68K *) 
£.: FILE; 


PROCEDURE Instructions (MnemonSym : TOKEN; 

OpLoc : CARDINAL; VAR Op : BITSET; 

VAR AddrModeA : ModeA; VAR AddrModeB : ModeB); 
(* Uses lookup table to find addressing mode & bit pattern of opcode. *) 


CONST 
GoLower = -l; 
GoHigher = +1; 


VAR 
Top, Bottom, Look : CARDINAL; 
Found : BOOLEAN; 
Search : INTEGER; 


(* index to Op-code table *} 


BEGIN 
Bottom := FIRST; 
Top := LAST; 
Found := FALSE; 


REPEAT (* Binary Search *) 
Look := (Bottom + Top) DIV 2; 
Search := CompareStr (MnemonSym, Table68K[Look] .Mnemonic) ; 


IF Search = GoLower THEN 
Top := Look - 1; 

ELSIF Search = GoHigher THEN 
Bottom := Look + 1; 

ELSE (* Got It! *) 
Found := TRUE; 

END; 

UNTIL (Top < Bottom) OR Found; 


IF Found THEN 
(* Return the instruction, mode, and address restristictions *) 
Op := Table68K[Look].Op; 
AddrModeA := Table68K [Look] .AddrModeA; 
AddrModeB := Table68K[Look] .AddrModeB; 
ELSE 


Error (OpLoc, NoCode) ; 
ND; 
END Instructions; 


(* MODULE Initialization *) 
IF Open (f, "“OPCODE.DAT") # FileOK THEN 


WriteString ("Can't Find 'OPCODE.DAT’."); 
WriteLn; 


HALT; 
END; 


FOR i := FIRST TO LAST DO 
ReadRec (f, Table68K[i]); 
END; 


IF Close (f}) # FileOK THEN 
(* Don't worry about it! *) 


END; 
END OperationCodes. 


Listing Sixteen 


MODULE InitOperationCodes; 


(* Module to construct the file containing the Operation Code Data Table *) 


FROM Files IMPORT 


FILE, FileState, Create, WriteRec, Close; 


FROM Terminal IMPORT 
WriteString, WriteLn; 


FROM Parser IMPORT 
TOKEN; 


CONST 
FIRST = 1; 
LAST = 118; 


TYPE 

ModeTypeA = (RegMem3, 
Ry02, 
Rx911, 
Data91l1, 
CntR911, 
Brnch, 
DecBr, 
Data03, 
Data07, 
OpM68D, 
OpM68A, 
OpM68C, 
OpM68X, 
OpM68S, 
OpM68R, 
OpM37) ; 


ModeTypeB = (Bit81l, 
Size67, 
Size6é, 
$izel213A, 
S$izel213, 
Exten, 
EAOSa, 
EAOSb, 
EAOSc, 
EAOSd, 
EAOSe, 
EAOSf, 
EAOSx, 
EAOSy, 
EAOSz, 
EA611); 


ModeA = SET OF ModeTypeA; 
ModeB = SET OF ModeTypeB; 


TableRecord = RECORD 
Mnemonic : 


Op : BITSET; 


AddrModeA 
AddrModeB 
END; 


VAR 


Table68K : ARRAY ([FIRST..LAST] OF TableRecord; 
(* index variable for initializing Table68K *) 


i : CARDINAL; 


£ : FILE; (* "OPCODE.DAT” 


BEGIN 
Lem. Le 
WITH Table68K[i] DO 
Mnemonic := "ABCD"; 
Op := {15, 14, 8}; 


AddrModeA := ModeA{Rx911, RegMem3, Ry02}; 


AddrModeB := ModeB{}; 
END; 


INC (1): 
WITH Table68K[i] DO 
Mnemonic := "ADD"; 
Op s= {15, 14, 12}; 
AddrModeA := ModeA{OpM68D}; 
AddrModeB := ModeB{EAOSy}; 
END; 


INC (i); 
WITH Table68K[i] DO 
Mnemonic := "ADDA"; 
Op := {15, 14, 12}; 
AddrModeA := ModeA{OpM68A}; 
we AddrModeB := ModeB{EA05a}; 
D; 


INC (4) 3 

WITH Table68K[i] DO 
Mnemonic := "ADDI"; 
Op := {10, 9}; 
AddrModeA := ModeA{}; 


AddrModeB := ModeB{Size67, EAOSe, Exten}; 


END; 


ts > 


End Listing Fifteen 


(* 0 = Register, 1 = Memory *) 

(* Register Rx -- Bits 0-2 *} 

(* Register Ry -- Bits 9-11 *) 

{* Immediate Data -- Bits 9-11 *} 
(* Count Register or Immediate Data *) 
(* Relative Branch *} 

(* Decrement and Branch *) 

(* Used for VECT only *) 

(* Branch & MOVEQ *) 

(* Data *) 

(* Address *) 

(* Compare *) 

(* XOR *) 

(* Sign Extension *) 

(* Register/Memory *)} 

(* Exchange Registers *) 





(* BIT operations - bits 8/11 as switch *) 
(* 00 = Byte, 01 = Word, 10 = Long *) 
(* 0 = Word, 1 = Long *) 

(* 01 = Byte, 11 = Word, 10 = Long *) 
(* 11 = Word, 10 = Long *) 

(* OpCode extension required *) 

(* Effective Address - ALL *) 

(* Less 1 *) 

(* Less 1, 11 *} 

(* Less 9,'10, 11 *) 

(* Less 1, 9, 10, 11 *) 

(* Dege.0, 27 S37c4> 21s} 

(* Dual mode - OR/AND *) 

(* Dual mode — ADD/SUB *) 

(* Dual mode - MOVEM *)}) 

(* Used only by MOVE *) 


TOKEN; 


: ModeA; 
: ModeB; 


" 


(continued on page 88) 
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THE PROGRAMMERS 
C Programmers: 


. 


7 Ways to Increase Productivity 


SORT/MERGE With 
RECORD SELECTION 
& OUTPUT 
REFORMATTING 
with OPT-TECH SORT 


New 3.0 version is even faster and more 
powerful. Improve your system's pertfor- 
mance with OPT-TECH SORT. OPT- 
TECH includes: 

CALLable and Standalone use 

All major languages 

Variable and fixed length 

Up to 10 sort/select fields 

Autoselect of RAM or disk 

Options: dBASE, BTrieve files 

1 to 10 files input 

No software max for 

# records 

Full memory utilization 

All common field types 

Bypass headers, limit sort 

Inplace sort option 

_ © Output = Record or keys 

_ Try what you're using on an XT: 1,000 
_ 128 byte records, 10 byte key in 33 


seconds. MSDOS $135 





Cross Compiler with 
COMPLETE SOURCE: QCX 


_ Expand your audience with a cross-com- 
_ piler and get full source code to the com- 


_ _ piler and library. QCX can help you learn 


techniques for compiler design and parsing 


_ while providing you with a low-cost de- 


velopment tool. Hosted on MSDOS, Unix 
(or Xenix), or Vax VMS and generates 

-~ ROMable Z80 assembly code. Cross as- 
_. semblers and linkers are separately 
available. 
- QCX supports long integers and single- 
_ precision floating point, with only minor 


restrictions to K&R standard. Arguments 
— to functions are reversed, which allows 
any function to have a variable number 


of arguments. 
___ AO, an optional host optimizer, is avail- 
able for only $125. Buy QCX for $465 
and we'll include AO FREE! 

Consider the native MSDOS compiler 


for $125. 


Dear C Programmer: 

















MSDOS $465 


We carry over 100 C compilers, 
or PCDOS. Call one of our knowledgeable consultants - toll free - 


NEW HOURS 
8:30 AM - 8:00 PM EST. 


C DYNAMO! 
WINDOWING: Full C Source, 
No Royalties 
POWER WINDOWS and C 
FUNCTION LIBRARY 


Power Windows covers all the bases: over- 
lays, borders, 1-2-3 style or pop-up menus/ 
help windows, zap instantly on/off screen, 
status lines, horizontal/vertical scrolling, 


color control or highlighting, word-wrap, — 


files to windows, keyboard to windows. 
Powerful, easy to use, integrated error 
messages, thorough documentation. Sup- 
ports IBM monochrome or color. 

C Function Library - includes 325 fun- 
damental functions with readable source 
and thorough documentation. 

No matter what you have, you need these. 
Best value available. Highly recom- 
mended! 


Power Windows MSDOS 
Only $119 

C Function Library MSDOS. 
Only $119 


Even for Small Files: 
Convenient, Fast Access 
CBTREE — Only $99 
Why spend time writing file management 
code when you can use consistent, flexible, 
documented, professional functions? Even 
multiuser record locking and variable- 

length records are supported. 

.Add, delete, and update without needing 
to reindex. Store keys ‘and record locations 
in B + trees. 

You can access any record or group -of 
records by the value of a user specific 
key. Search your files from any point, 
forward or backward. 

Full, balanced B-tree support includes 
use of multiple keys, unlimited number 
and length of keys. 


Use this powerful ISAM, even if you’ve - 


previously done without. 

Learn how to write systems for managing 
large files by using CBTREE source as a 
guide. Modify it and transfer it to another 
operating environment without royalties. 


MSDOS $99 


You want the best development software for your needs. These products will help you: 
¢ Speed your development efforts 
¢ Wnite even better programs 


interpreters, support libraries, debuggers, and addons, specifically designed for C programmers using MSDOS 
for details. comparisons, or for one of our specially prepared packets on C. 

There is no obligation. You must be completely satisfied with the products you purchase or you will receive a full refund or replacement. You 
risk nothing with our 3! day risk-free trial on any product in this ad. 
Yours for more productive programming, 


Call for a catalog, literature, advice and service you can trust 


800-421-8006 


THE PROGRAMMER’S SHOP™ 


128-D Rockland Street, Hanover, MA 02339 
Mass: 800-442-8070 or 617-826-7531 






Circle no. 141 on reader service card. 


db_VISTA 
First Database Exclusively for C is also Royalty-Free, 


— “If you are looking for a sophisticated C programmer's database, this is it.” — 
- Dave Schmitt, President, Lattice, Inc. 

Designed exclusively for C, db_VISTA is a royalty-free programmer’s DBMS. Take 
full advantage of C through ease of use, portability, and efficiency. You optimize for 
speed and efficient disk storage. 

Multiple key records, fast B-tree indexing, virtual memory disk accessing. Tailor 
db_VISTA to your needs by using only those features you require. Optional dBASE, 
R:BASE, and ASCII file transfer utilities make moving to db_VISTA a snap. 


MSDOS, Unix, Xenix, MacIntosh. Single user Source $459. 
Object $179. Multiuser Source $929. Object $450 


Add Full Modem Control to Your Program 
Greenleaf Comm Library | 


Writing and debugging communication programs can be difficult and frustrating. Use 
stable, reliable and comprehensive existing code. Communicate with remote systems 
or databases with an asynchronous communications library for C. a 
Individual transmission and reception ring buffers combine with an interrupt-driven sys- 
tem. . 
Included are 3 library/object files, 220 functions, 230 page manual, complete source —_— 
code. Library supports Microsoft 3.0, Lattice 3.0, Aztec, and others. Hayes-compatible  —_ 
modem commands, and a complete sample file transfer program. PCDOS $149 





Comprehensive C Development Library 
C-Worthy by Custom Design Systems 


C-WORTHY eliminates the writing of routine code and frees you to work on what 
makes your programs unique. Includes 425 pages of documentation with an in-depth 
tutorial and source code to a sample program. 

A complete, consistent, and interrelated set of subsystems and functions facilitates 
keyboard handling, background procedures, list manipulation, screen handling, menu ~ 
management, windowing, error reporting, context-sensitive help, DOS interfacing, 
and MORE. 

Now you can support incompatible machines (like IBM PC, VICTOR 9000, Texas 
Instruments Professional, NEC APCIII, Wang PC, and HP 150) with the same .EXE 
file. No recompilation or relinking is required. All machine-dependent aspects of 
each microcomputer are isolated in a separate runtime overlay file which is loaded 
into the-computer’s memory along with the application at runtime. C-Worthy appli- 

- cations can also be executed on networks running Novell’s NetWare. 
The C-Worthy development utilities Help Librarian, Message Librarian, and Error 


_ Librarian allow applications to support alternate languages (like French, German, 


etc.) with the same source code. C-Worthy’s philosophy of program development is 


_ revolutionary, encouraging modular design through the use of action procedures as 


arguments to functions. C-Worthy’s unique design approach provides application de- 


_ velopers with a consistent and intuitive user interface with features for both novice 
and advanced users. No royalties. For Lattice C and others. 


MSDOS $295 







¢ Increase productivity 
¢ Reduce your programming frustration 


Ravim bd Ffpale 


Bruce W. Lynch, President 






“You’ve got everything I’ve heard of, and much I 

haven’t! . . . Normally, I expect my money to be 

“fan letter” enough, but you people are SUPER!” 
— Shel Hall 
Artell Corp. 
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Listing Sixteen (Listing continued, text begins on page 44.) 


ING. (i) 3 
WITH Table68K[i] DO 
Mnemonic := "ADDQ"; 
Op := {14, 12}; 
AddrModeA := ModeA{Data911}; 
AddrModeB := ModeB{Size67, EAOSd}; 
END; 


INC (i); 
WITH Table68K[i] DO 
Mnemonic := "ADDX"; 
Op = -{15,--14, '<12,. Shs 
AddrModeA := ModeA{RegMem3, Rx911, Ry02}; 
AddrModeB := ModeB{Size67}; 
END; 


INC (i): 
WITH Table68K[i] DO 
Mnemonic := "AND"; 
Op := {15, 14}; 
AddrModeA := ModeA{OpM68D}; 
AddrModeB := ModeB{EA05x}; 


END; 

ING. (1); 

WITH Table68K[i] DO 
Mnemonic := "ANDI"; 
Op := {9}; 


AddrModeA := ModeA{}; 
AddrModeB := ModeB{EAOSe, Size67, Exten}; 
END; 


ENG 2G): 

WITH Table68K[i] DO 
Mnemonic := "ASL"; 
Op = 415;,- 14,., 13, Shs 
AddrModeA := ModeA{CntR911}; 
AddrModeB := ModeB{}; 

END; 


INC (i); 

WITH Table68K[i] DO 
Mnemonic := "ASR"; 
Opi-s= {15,.-14, .13}¢ 
AddrModeA := ModeA{CntR911}; 
AddrModeB := ModeB{}; 

END; 


ING (2)is 

WITH Table68K[i] DO 
Mnemonic := "BCC"; 
Op t=. {14, 13, 10}; 
AddrModeA := ModeA{Brnch}; 
AddrModeB := ModeB{}; 

END; 


ING (i)? 
WITH Table68K[i] DO 

Mnemonic := "“BCHG"; 

Op := {6}; 

AddrModeA := ModeA{}; 

AddrModeB := ModeB{EAOSe, Exten, Bit811l}; 
END; 


INC: {i} 
WITH Table68K[i] DO 

Mnemonic := "BCLR"; 

Op: seth}? 

AddrModeA := ModeA{}; 

AddrModeB := ModeB{EAOSe, Exten, Bit811}; 
END; 


ING (i); 

WITH Table68K[i] DO 
Mnemonic := "BCS"; 
Op s= -{14, 13,° 10,. St: 
AddrModeA := ModeA{Brnch}; 
AddrModeB := ModeB{}; 

END; 


INC (i); 

WITH Table68K[i] DO 
Mnemonic := "BEQ"; 
Op. s= {14, 13, 10, 9, 8}: 
AddrModeA := ModeA{Brnch}; 
AddrModeB := ModeB{}; 

END; 


ING. CL} 

WITH Table68K[i] DO 
Mnemonic := "BGE"; 
Op 3 t14,. 13, 11; 10}: 
AddrModeA := ModeA{Brnch}; 
AddrModeB := ModeB{}; 

END; 


INC (i): 

WITH Table68K[i] DO 
Mnemonic := "BGT"; 
Op sa {i4;, -1sy- 21, +10, S}z 
AddrModeA := ModeA{Brnch}; 
AddrModeB := ModeB{}; 

END; 


INC (i); 

WITH Table68K[i] DO 
Mnemonic := "BHI"; 
Op s= (14, ..13;. 9}? 
AddrModeA := ModeA{Brnch}; 
AddrModeB := ModeB{}; 

END; 


INC (i); 
WITH Table68K[i] DO 
Mnemonic := "BLE"; 
Op ere { F4,° 13,11; .10,°° 9s 83; 
AddrModeA := ModeA{Brnch}; 
AddrModeB := ModeB{}; 
END; 


INC (i); 

WITH Table68K[i] DO 
Mnemonic := “BLS”; 
Op. se {1450 J3).9,. (8k 
AddrModeA := ModeA{Brnch}; 
AddrModeB := ModeB{}; 

END; 


INC (i); 
WITH Table68K[i] DO 
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Mnemonic := "BLT"; 
Op := {14, 13, 11, 10, 8}; 
AddrModeA := ModeA{Brnch}; 
AddrModeB := ModeB{}; 

END; 


INC (1); 

WITH Table68K[i] DO 
Mnemonic := "BMI"; 
Op 181-14 52/137 022 ;* 95 Be 
AddrModeA := ModeA{Brnch}; 
AddrModeB := ModeB{}; 

END; 


INC? (1 )is 

WITH Table68K[i] DO 
Mnemonic := "BNE"; 
Op = (24; 13, :10; 9}: 
AddrModeA := ModeA{Brnch}; 
AddrModeB := ModeB{}; 

END; 


INC (i); 

WITH Table68K[i] DO 
Mnemonic := "BPL"; 
Op = 4745 lap 11,29}2 
AddrModeA := ModeA{Brnch}; 
AddrModeB := ModeB{}; 

END; 


ING’ (1) 3 
WITH Table68K[i] DO 
Mnemonic := "BRA"; 
Op-:= {14, 13}; 
AddrModeA := ModeA{Brnch}; 
AddrModeB := ModeB{}; 
END; 


ING (i): 
WITH Table68K[i] DO 

Mnemonic := "BSET"; 

Op := {7, 6}; 

AddrModeA := ModeA{}; 

AddrModeB := ModeB{EAOSe, Exten, Bit811}; 
END; 


ING «-(i) 3 

WITH Table68K[i] DO 
Mnemonic := "BSR"; 
Op := {14, 13, 8}; 
AddrModeA := ModeA{Brnch}; 
AddrModeB := ModeB{}; 

END; 


INC (i); 
WITH Table68K[i] DO 

Mnemonic := "BTST"; 

Op := {}; 

AddrModeA := ModeA{}; 

AddrModeB := ModeB{EAO5c, Exten, Bit811}; 
END; 


INC: (1) 2 

WITH Table6é8K[i] DO 
Mnemonic := "BVC"; 
Op := {14, 13, 11}; 
AddrModeA := ModeA{Brnch}; 
AddrModeB := ModeB{}; 

END; 


INC’ (4) 3 

WITH Table68K[i] DO 
Mnemonic := "BVS"; 
Op “smn { ld, 335 721-8} 3 
AddrModeA := ModeA{Brnch}; 
AddrModeB := ModeB{}; 

END; 


ING - (i} 3 
WITH Table68K[i] DO 
Mnemonic := "CHK"; 
Op := {14, 8, 7}; 
AddrModeA := ModeA{Rx911}; 
AddrModeB := ModeB{EA05b}; 
END; 


ING, -(2) 3 
WITH Table68K[i] DO 

Mnemonic := "CLR"; 

Op ‘ss. (i4;, -3)} 2 

AddrModeA := ModeA{}; 

AddrModeB := ModeB{Size67, EAOSe}; 
END; 


INC (i); 
WITH Table68K[i] DO 
Mnemonic := "CMP"; 
Cp satis, is; w23s 
AddrModeA := ModeA{OpM68C}; 
AddrModeB := ModeB{EAO0Sa}; 
END; 


INC (i); 
WITH Table68K[i] DO 
Mnemonic := "CMPA"; 
Op.':= {25 ,-43,°212}; 
AddrModeA := ModeA{OpM68A}; 
AddrModeB := ModeB{EA0Sa}; 
END; 


INC .(i}2 
WITH Table68K[i] DO 

Mnemonic := "CMPI"; 

Op <= {11, 10}; 

AddrModeA := ModeA{}; 

AddrModeB := ModeB{Size67, EAQS5e, Exten}; 
END; 


INC. (i): 
WITH Table68K[i] DO 
Mnemonic := "“CMPM"; 
Op: "$15,323, 42,48; she 
AddrModeA := ModeA{Rx911, Ry02}; 
AddrModeB := ModeB{Size67}; 
END; 


INC: .t7.):2 
WITH Table68K[i] DO 
Mnemonic := "DBCC”; 
Op..2* T24, 212,°10, °F, 6,= 37% 


AddrModeA := ModeA{DecBr}; 
AddrModeB := ModeB{}; 
END; 


INC (i); 

WITH Table68K[i] DO 
Mnemonic := "DBCS"; 
Op "te? {45 325° 10,48,.4, -653}3 
AddrModeA := ModeA{DecBr}; 
AddrModeB := ModeB{}; 

END; 


ING. (2) 5 

WITH Table68K[i] DO 
Mnemonic := "DBEQ"; 
Op.2) (:145-12;- 10,1 925/85, 77. 6,337 
AddrModeA := ModeA{DecBr}; 
AddrModeB := ModeB{}; 

END; 


ENG :§1:) > 

WITH Table68K[i] DO 
Mnemonic := "DBF"; 
Op := {14, 12, 8, 4520, 3 h2 
AddrModeA := ModeA{DecBr}; 
AddrModeB := ModeB{}; 

END; 


INC (i); 

WITH Table68K[i] DO 
Mnemonic := "DBGE"; 
On s=) {145 12, 12, 1053/7 
AddrModeA := ModeA{DecBr 
AddrModeB := ModeB{}; 

END; 


56,3} 2 
}3 


INC (i)? 

WITH Table68K[i] DO 
Mnemonic := "DBGT"; 
Op. sai i8. “2, 117.710) 9, 7,. 6Gae3}s 
AddrModeA := ModeA{DecBr}; 
AddrModeB := ModeB{}; 

END; 


INC (i}; 

WITH Table68K[i] DO 
Mnemonic := "DBHI"; 
Op. = £14, <12, .9,. 7,> 6, “She 
AddrModeA := ModeA{DecBr}; 
AddrModeB := ModeB{}; 

END; 


INC. (i}3: 
WITH Table68K[i] DO 
Mnemonic := "DBLE"; 
Opt of Pasi 1274s, 10, --9,."S;" 7;. 6,--3he 
AddrModeA := ModeA{DecBr}; 
AddrModeB := ModeB{}; 
END; 


INC (i); 

WITH Table68K[i] DO 
Mnemonic := "DBLS"; 
Op =: (14, 12, 9,.-8, +7; 6, 3} 
AddrModeA := ModeA{DecBr}; 
AddrModeB := ModeB{}; 

END; 


INC (i); 

WITH Table68K[i] DO 
Mnemonic := "DBLT"; 
Op ss8444),; 252,11, 10; 8, 7,5. 6; 3}s 
AddrModeA := ModeA{DecBr}; 
AddrModeB := ModeB{}; 

END; Ls. 

ING-. (2)iF 

WITH Table68K[i] DO 
Mnemonic := "DBMI"; 
Op ss= 91145012011) 79). 8,7; 6).-3)3 
AddrModeA := ModeA{DecBr};— 
AddrModeB := ModeB{}; 

END; 


INC (i); 

WITH Table68K[i] DO 
Mnemonic := "DBNE"; 
Op := {14,.-12, 10, 9, 7, 6, 3}; 
AddrModeA := ModeA{DecBr}; 
AddrModeB := ModeB{}; 

END; 


INC (i): 

WITH Table68K[i] DO 
Mnemonic := "DBPL"; 
Op i= {14,-12, Th, 99, ‘3, 6,3}; 
AddrModeA := ModeA{DecBr}; 
AddrModeB := ModeB{}; 

END; 


INC (i); 

WITH Table68K[i] DO 
Mnemonic := "DBRA"; 
Opis: t14;.- 12): 8-7 6,3} 
AddrModeA := ModeA{DecBr}; 
AddrModeB := ModeB{}; 

END; 


INC (i); 

WITH Table68K[i] DO 
Mnemonic := "DBT"; 
Opis= {14,5 22,.- 7, 6&3} 2 
AddrModeA := ModeA{DecBr}; 
AddrModeB := ModeB{}; 

END; 


INC. (ie 

WITH Table68K[i] DO 
Mnemonic := "DBVC"; 
On) 8 18s ia hl Py. Bs. She 
AddrModeA := ModeA{DecBr}; 
AddrModeB := ModeB{}; 

END; 


INC (i); 
WITH Table68K[i] DO 
Mnemonic := "DBVS"; 


(continued on page 90) 
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Tine track tape users 
lero to Mainfram 
Connection 


The Mode! TC-50 %-inch tape subsystem provides a 
standard medium for transmission of mainframe data base 
information to PC users, while maintaining mainframe 
isolation and data integrity. Use ODI subsystems to import 
data to data base programs like dBase Ill. 


The TC-50 subsystem also provides fast back-up capability 

as well as a device driver 
and interface soft- 

ware for popular 
compilers. 


The TC-50 subsystem ~ 
includes tape drive con- , eae aes @ 


troller, | nd docu- 

oo iion. All ODI ' Overland Data, Inc. 

products carry a 30 day \ 5644 Kearny Mesa Road 

unconditional money-back San Diego, CA 92111 

guarantee, and are war- : Tel. (619)571-5555 

ranted for one year, Telex 754923 OVERLAND __ 
_ parts and labor. —<— 


Avoid 
erasing the 
wrong files! 





Back up 
files by time 
el and date! 
Also Available— | 
XENIX tape 
subsystems _ 
for the 
IBM AT | 


“DateStamper... 
is areal winner. ”’ 


Bruce Morgen, Users 
Guide, Jul-Aug. 1985 


Write or call for 
further information 


Pies dhe 4 cs fence caro cerd, — (714) 659-4432 BOX 1494, IDYLLWILD, CA 92349 





Circle no. 193 on reader service card. 


Time and Money. 


We've just done something we know you'll like. Battery Backup, Too 
We've made the SemiDisk far more affordable than 


ever before. With price cuts over 25% for most of 
our product line. Even our new 2 megabyte units 
are included. 




















At 0.7 amps per 2 megabytes, SemiDisk consumes 
far less power than the competition. And you don't 
have to worry if the lights go out. The battery 
backup option gives you 5-10 hours of data 

It’s Expandable protection during a blackout. Nobody else has this 


important feature. Why risk valuable data? 
SemiDisk Systems builds fast disk emulators for Sy eee ee ee noes 


more microcomputers than anyone else. S-100, The Best News 

IBM-PC, Epson QX-10, TRS-80 Models II, 12, and 16. 512K Mbyte 2Mbyte 
You can start with as little as 512K bytes, and later — SemiDisk I, S-100 $695 $1395 

upgrade to 2 megabytes per board...at your own SemiDisk II, $-100 $995 $1995 
pace, as your needs expand. Up to 8 megabytes per —s [BM PC, XT, AT $595 $1795 
computer, using only four bus slots, max! Software = Qx-10 $595 $1795 
drivers are available for CP/M 80, MS-DOS, ZDOS, _TrRs-80 I, 12, 16 $695 $1795 
TurboDOS, VALDOCS 2, and Cromix. SemiDisk Battery Backup Unit $150 $150 $150 


turns good computers into great computers. 


SEMIDISK 


se Sees 
SemiDisk Systems, Inc., P.O. Box GG, Beaverton, Oregon 97075 503-642-3100 


Call 503-646-5510 for CBBSNW’, $03-775-4838 for CBBS/PCS. and $03-649-8327 for CBBS/Aloha. all SemiDisk equipped computer bulletin boards ( 300/1200 baud ) SemiDisk. SemiSpool trademarks of SemiDisk Systems. 


Someday you'll get a SemiDisk. 
Until then, you'll just have to....wait. 








Circle no. 85 on reader service card. 





Gn t= (146, 12; >34;5- 851 5703-6, 333 
AddrModeA := ModeA{DecBr}; 
AddrModeB := ModeB{}; 

END; 


INC (i); 
WITH Table68K[i] DO 
Mnemonic := "DIVS"; 
Op <= {15, 8,° 7, 6}: 
AddrModeA := ModeA{Rx911}; 
AddrModeB := ModeB{EAO5b}; 
END; 


INC (i); 
WITH Table68K[i]} DO 
Mnemonic := "DIVU"; 
Op := {15, 7, 6}; 
AddrModeA := ModeA{Rx911}; 
AddrModeB := ModeB{EAO5b}; 
END; 


ING. - (2): 
WITH Table68K[i]}] DO 
Mnemonic := "EOR";. 
Op. = -{15, -13,. 12}3 
AddrModeA := ModeA{OpM68X}; 
AddrModeB := ModeB{EAO0Se}; 
END; 


INC (1}3 
WITH Table68K[i] DO 

Mnemonic := "EORI”; 

Op.:= {11, 9}; 

AddrModeA := ModeA{}; 

AddrModeB := ModeB{Size67, EAOSe, Exten}; 
END; 


Inc (1) 

WITH Table68K[i] DO 
Mnemonic := "EXG"; 
Op := {15, 14, 8}; 
AddrModeA := ModeA{0OpM37}; 
AddrModeB := ModeB{}; 

END; 


Ine (2) 
WITH Table68K[i] DO 
Mnemonic := "EXT"; 
Op s= {14, 11}; 
AddrModeA := ModeA{OpM68S}; 
AddrModeB := ModeB{}; 
END; 


INC (1); 
WITH Table68K[i] DO 
Mnemonic := "ILLEGAL"; 
Op 414, 11,9: Ft, 6... 55-47-23, 2}2 
AddrModeA := ModeA{}; 
AddrModeB := ModeB{}; 
END; 


INC (i); : 
WITH Table68K[i] DO 
Mnemonic := "JMP"; . 
Op :=.{14;. 11, 10;-9, 7, 6}: 
AddrModeA := ModeA{}; 
AddrModeB := ModeB{EA0O5£}; 
END; 


INC (i); 
WITH Table68K[i] DO 
Mnemonic := "JSR"; 
Op := (14, 11, 10, 9, Th: 
AddrModeA := ModeA{}; 
AddrModeB := ModeB{EAOSf}; 
END; 


Inc: (i); 

WITH Table68K[i] DO 
Mnemonic := "LEA"; 
Op := {14, 8, 7, 6}; 
AddrModeA := ModeA{Rx911} 
AddrModeB := ModeB{EAOSf} 

END; 


. 
’ 

. 
’ 


INC €i}>5 
WITH Table68K[i] DO 
Mnemonic := "LINK"; 
Ops {145 11, 16,29; 6; 4}: 
AddrModeA := ModeA{Ry02}; 
AddrModeB := ModeB{Exten}; 
END; 


INC (i); 

WITH Table68K[i] DO 
Mnemonic := "LSL"; 
Op s= {18s 14, 13, 29; 8; Shy 
AddrModeA := ModeA{CntR911}; 
AddrModeB := ModeB{}; 

END; 


INC (i); 

WITH Table68K[i] DO 
Mnemonic := "LSR"; 
Op t=. (15, 14, 13, 9, 3} 
AddrModeA := ModeA{CntR911}; 
AddrModeB := ModeB{}; 

END; 


INC (i)? 
WITH Table68K[i] DO 

Mnemonic := "MOVE"; 

Op := {}7 

AddrModeA := ModeA{}; 

AddrModeB := ModeB{Sizel213A, EA611}; 
END; 


INC (i)? 
WITH Table68K[i]}] DO 
Mnemonic := "MOVEA”; 
Op := {6}; 
AddrModeA := ModeA{Rx911}; 
AddrModeB := ModeB{Sizel213, EAOSa}; 
END; 


INC (1)? 
WITH Table68K[i] DO 
Mnemonic := "MOVEM"”; 
32 {14, ii, The 
AddrModeA := ModeA{}; 
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AddrModeB := ModeB{Size6, EAOSz, Exten}; 
END; 


INC (i); 
WITH Table68K[i] DO 
Mnemonic := "“MOVEP”; 
Op := {3}; 
AddrModeA := ModeA{OpM68R}; 
AddrModeB := ModeB{Exten}; 
END; 


INC (i); 

WITH Table68K[i] DO 
Mnemonic := “MOVEQ"; 
Op := {14, 13, 12}; 
AddrModeA := ModeA{Data07}; 
AddrModeB := ModeB{}; 

END; 


INC (i); 

WITH Table68K[i] DO 
Mnemonic := "“MULS"; 
Op := (15;. 14,..8,-7,. 6)3 
AddrModeA := ModeA{Rx911}; 
AddrModeB := ModeB{EAO0Sb}; 


END; 


INC (i); 
WITH Table68K[i] DO 
Mnemonic := “MULU"; 
Op. .3:= {15, 14, ‘7, .6}3 
AddrModeA := ModeA{Rx911}; 
AddrModeB := ModeB{EAO05b}; 
END; 


INC (i}3 
WITH Table68K[i] DO 
Mnemonic := "NBCD"; 
Op :s= {14, 11}; 
AddrModeA := ModeA{}; 
AddrModeB := ModeB{EAO0Se}; 
END; 


INC (i); 
WITH Table68K[i] DO 

Mnemonic := "NEG"; 

Op := {14, 10}; 

AddrModeA := ModeA{}; 

AddrModeB := ModeB{Size67, EAOSe}; 
END; 


INC (1); 
WITH Table68K[(i] DO 

Mnemonic := "NEGX"; 

Op := {14}; 

AddrModeA := ModeA{}; 

AddrModeB := ModeB{Size67, EAOSe}; 
END; 


INC (i); 

WITH Table68K[i] DO 
Mnemonic := "NOP"; 
Op => ¢14, 11, 10;..9, 
AddrModeA := ModeA{}; 
AddrModeB := ModeB{}; 

END; 


INC (i); 
WITH Table68K[i] DO 

Mnemonic := "NOT"; 

Op := {14, 10, 9}; 

AddrModeA := ModeA{}; 

AddrModeB := ModeB{Size67, EAOSe}; 
END; 


INC (1); 
WITH Table68K[i] DO 
Mnemonic := "OR"; 
Op := {15}; 
AddrModeA := ModeA{OpM68D}; 
AddrModeB := ModeB{EAOSx}; 
END; 


INC (i); 
WITH Table68K[i] DO 

Mnemonic := "ORI"; 

Op := {}; 

AddrModeA := ModeA{}; 

AddrModeB := ModeB{Size67, EAOSe, Exten}; 
END; 


INC (i); 
WITH Table68K[i] DO 
Mnemonic := "PEA"; 
Op -3=.-£14, :i1,-6}; 
AddrModeA := ModeA{}; 
AddrModeB := ModeB{EAOSf}; 
END; 


INC (i); 

WITH Table68K[i] DO 
Mnemonic := "RESET"; 
Op ta.f14, ‘Pi, -10;')9,:6,.-5,° €} 
AddrModeA := ModeA{}; 
AddrModeB := ModeB{}; 

END; 


INC (1)3 

WITH Table68K[i] DO 
Mnemonic := "ROL"; 
On = alos i464, - 2307 20,9) 8, 4,335 
AddrModeA := ModeA{CntR911}; 
AddrModeB := ModeB{}; 

END; 


INC (i); 

WITH Table68K[i] DO 
Mnemonic := "ROR"; 
Opi 3-15; - 14, 13,)-10;,. 9; 4.3}: 
AddrModeA := ModeA{CntR911}; 
AddrModeB := ModeB{}; 

END; 


INC (i); 
WITH Table6sK[i] DO 
Mnemonic := "ROXL"; 
Op: sm (25;5..14, <13;,, -30,7:8;" 433 
AddrModeA := ModeA{CntR911}; 
a AddrModeB := ModeB{}; 
D; 


INC (i); 

WITH Table68K[i] DO 
Mnemonic := "ROXR"; 
Op := {15, 14, 13, 10, 4}; 
AddrModeA := ModeA{CntR9311}; 
AddrModeB := ModeB{}; 

END; 


INC (i); 

WITH Table68K[i] DO 
Mnemonic := "RTE"; 
Op 23 .({14, :11,.10, 9, 
AddrModeA := ModeA{}; 

_ AddrModeB := ModeB{}; 

END; 


6, 5, 4, 1, 0}; 


INC (i); 
WITH Table68K[i]}) DO 
Mnemonic := "RTR"; 
Op .s= (14, 11, 10, 9,- 6,5, 4, 2, 2, 0}F 
AddrModeA := ModeA{}; 
AddrModeB := ModeB{}; 
END; 


INC. (i) 
WITH Table68K[(i] DO 
Mnemonic := "RTS"; 
Op:-cm (14,11) "10, 9; 6,.S,-4,.°2, 0} 2 
AddrModeA := ModeA{}; 
AddrModeB := ModeB{}; 
END; 


mc -413: 
WITH Table68K[i] DO 
Mnemonic := "SBCD"; 
Op := {15, 8}; 
AddrModeA := ModeA{Rx911, RegMem3, Ry02}; 
AddrModeB := ModeB{}; 
END; 


INC (i); 
WITH Table68K[i] DO 
Mnemonic := "SCC"; 
Op: 2=: {14,-°12,'- 10,7, 6}: 
AddrModeA := ModeA{}; 
AddrModeB := ModeB{EA0Se}; 
END; 


INC (i); 
WITH Table68K[i] DO 
Mnemonic := "SCS"; 
Op := {14, 12, 10, 8, 7, 6}; 
AddrModeA := ModeA{}; 
AddrModeB := ModeB{EA0Se}; 
END; 


INC (i)? 
WITH Table68K[i] DO 
Mnemonic := "SEQ"; 
Op *s= °(14,'12,.- 10, °9,, Sy 7, 6};3 
AddrModeA := ModeA{}; 
AddrModeB := ModeB{EA0Se}; 
END; 


INC (i); 
WITH Table68K[i] DO 
Mnemonic := "SF"; 
Op 2= (14, -12, 8,: 7,6}; 
AddrModeA := ModeA{}; 
AddrModeB := ModeB{EA0Se}; 
END; 


INC (i); 
WITH Table68K[i} DO 
Mnemonic := "SGE"; 
Opis= (14,12), 11,210, 7, 6}s 
AddrModeA := ModeA{}; 
AddrModeB := ModeB{EA0Se}; 
END; 


INC: (i); 
WITH Table68K[i] DO 
Mnemonic := "SGT"; 
Op t= (14, 12, 11,10, 9, 7, . 6}: 
AddrModeA := ModeA{}; 
AddrModeB := ModeB{EA0Se}; 
END; 


ENC {i}: 
WITH Table68K[i] DO 
Mnemonic := "SHI"; 
Op s=-{14,, 12, 95.7, 6}: 
AddrModeA := ModeA{}; 
AddrModeB := ModeB{EA0Se}; 
END; 


INC (i); 
WITH Table68K[i] DO 
Mnemonic := "SLE"; 
Op: ¢=).4.14,212,--14, -10,.-9, 8,3, S}s 
AddrModeA := ModeA{}; 
AddrModeB := ModeB{EA0Se}; 
END; 


INC \ (2) 
WITH Table68K[i] DO 
Mnemonic := "SLS"; 
Op: c=. {24,. 12," 9; 8,7, G}3 
AddrMcodeA := ModeA{}; 
AddrModeB := ModeB{EA0Se}; 
END; 


INC (i); 
WITH Table68K[i] DO 
Mnemonic := "SLT"; 
On+ ss) {345 12,- 21,20; 8, 7, 6} 
AddrModeA := ModeA{}; 
AddrMcodeB := ModeB{EA0Se}; 
END; 


INC (i); 
WITH Table68K[i] DO 
Mnemonic.:= "SMI"; 
Opn 1847 127) 34, £9, 8, Fy. -64 
AddrModeA := ModeA{}; 
AddrModeB := ModeB{EA0Se}; 
END; 


(continued on page 92) 
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BYSO™ LISP 


A production LISP compiler designed for 
optimum performance on the IBM PC. 
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e Includes interpreter — debug programs instantly. 
¢ Compatible with Common LISP and some earlier dialects. 


ae e Access to all system functions of IBM PC. 
File System LItility Libraries e Complete — has full screen editor, only PCDOS required. 


All products are written entirely in K&R C. Source e Tested and reliable — in use since Aug. ‘84, all known 


code included, No Royalties, Powerful & Portable. bugs fixed. 
e Very fast — does Jul. ‘84 BYTE Sieve test in .8 seconds. 


Cle 9&3 OO Other LISPs take 30 to 80 seconds. Garbage collects in 

® High speed random and sequential access. under a quarter second. 

® Multiple keys per data file with up to 16 million records per file. IM i 

* Duplicate keys, variable length data records. ° Visual syntax an editor written IN BYSO LISP 
that displays programs graphically. 


ISAM Driver 4.0 0o e Fully documented — all features explained, application 


C-PROGRANMMERS 


® Greatly speeds application development. notes given, full source code of Visual Syntax. 
e¢ Combines ease of use of database manager with flexibility of program- ¢ Not copy protected, preinstalled 
ming language. 7 : 
° Supports multi key files and dynamic index definition. e Generates stand alone code that is royalty free in most 
® Very easy to use. CdSeS. 


eo oo ¢ Priced as a good C compiler, not as a miracle expert 
ra system. | 


e Patterned after the UNIX utility. 
° Works for programs written in every language. Interpreter only, single user license $150. 


a ok eee te Le eee Compiler and interpreter, single user license $395. 
ull Documentation and Example Programs Included. Requires 256K, IBM PC or true compatible. 





OO 
ALL THREE PRODUCTS FOR — 14.9. LEVIEN INSTRUMENT CO. 
: , Sittlington Hill/P.O. Box 31 
F f ti all : 1343 Stanbury Dri 
or more information call or write ae aii 8 McDowell. VA 24458 
(416) 825-0903 
BYSO is a trademark of Raphael L. Levien. IBM PC is a registered 

Credit cards accepted. Dealer inquiries invited. trademark of the IBM Corporation. 
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| C CODE FOR THE PC 


Transform Your Programs 
source code, of course 


edward k. ream with 
CPP—C Preprocessor Plus ——_—$ Se 
Coneurrent Geo rc ee ee 


e Define arbitrarily complex macros with #define command. 

® Include and nest files to any depth with #include command. : : 

° Include lines with #if, #ifdef and #ifndef commands. Coder’s Prolog in: Cs. voc) ee 

¢ Define multiple constants with #enum command. 

¢ Optional extra feature: Imbed formatting or other commands LEX oe ee oer oP eee oe aa 
in your source code. (Lines starting with . or * are ignored.) 


Fast and flexible VAQC 2° PREP oo eee ee 


e 30 times faster than the Preprocessor published in Dr. Dobb’s ; 
Journal. Small-C compiler for 8088 .. . . $20 


e Can be used for any language, including assembler. 


° Can be used as a stand-alone macro/include processor. | tiny-c interpreter Re shel ee 
® Code can be used as the lexical analyzer for parsers or : 


assemblers. Xlisp. 1.$a & tiny-Prolog: = 25... 520 


Complete 
© You get complete SOURCE CODE in standard C. Co Topless i ee ee 
e You get everything you need to use CPP immediately. 
e CPP is unconditionally guaranteed. If for any reason you are : aie, : 
not satisfied with CPP, your money will be refunded promptly. a 


Price: $95. Call or write today: The Austin Code Works 
Edward K. Ream 
1850 Summit Ave., Dept. DD 11100 Leafwood Lane 


Madison, WI 53705 Austin, Texas 78750-3409 
C608). S Sheen (512) 258-0785 


TO ORDER: Specify both the operating system (MS-DOS, CP/M 80 or CPM 68k) 
and the disk format (8 inch CP/M or the exact type of 51% inch disk). Send a check or 
money order for $95 ($105 for foreign orders). Foreign checks must be denominated 


in U.S. dollars drawn on a U.S. bank. Sorry, | do NOT accept phone, credit card or Tree shi ing on prepaid orders No * . 
, "at credit cards 
COD orders. Please do NOT send purchase orders unless a check is included. pping prep 
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68K ASSEMBLER 


Listing SIXt@EN (Listing continued, text begins on page 44.) 


INC (i); AddrModeA := ModeA{Rx911, RegMem3, Ry02}; IF Create (f, "OPCODE.DAT") # FileOK THEN 
WITH Table68K[i]) DO AddrModeB := ModeB{Size67}; WriteString ("Unable to create OpCode File.”); 
Mnemonic := "SNE"; END; WriteLn; 
Op := {14, 12, 10, 9, 7, 6}; HALT; 
AddrModeA := ModeA{}; INC .{i)}3 END; 
AddrModeB := ModeB{EA05Se}; WITH Table68K[i}) DO 
END; Mnemonic := "SVC"; FOR i := FIRST TO LAST DO 
Op := {14, 12, 11, 7, 6}; WriteRec (f, Table68K[i]); 
INC (333 AddrModeA := ModeA{}; END; 
WITH Table68K[i]}] DO AddrModeB := ModeB{EAO0Se}; 
Mnemonic := "SPL"; END; IF Close (f) # FileOK THEN 
Op := {14, 12, 11, 9, 7, 6}; WriteString ("Unable to close OpCode File.”); 
AddrModeA := ModeA{}; INC (i); WriteLn; 
AddrModeB := ModeB{EA0Se}; WITH Table68K[i] DO END; 
END; Mnemonic := "SVS"; END InitOperationCodes. 
Opie {14,.) 12,5. 41, 8,...7, SO}? 
INC (i); AddrModeA := ModeA{}; 
WITH Table68K[i] DO AddrModeB := ModeB{EA0Se}; 
Mnemonic := "ST"; END; 
Op := {14, 12, 7, 6}3 
AddrModeA := ModeA{}; INC (i); 
AddrModeB := ModeB{EA0Se}; WITH Table68K[i} DO 
END; Mnemonic := "SWAP"; 


Op := {14, 11, 6}; 
AddrModeA := ModeA{Ry02}; 


INC (4); - Y 
WITH Table68K[i] DO dae s= Moden{}; 


Mnemonic := "STOP"; 

Op. :=.{14, 11, 10, 9, 6, 5, 4, 1}? 
AddrModeA := ModeA{}; 

AddrModeB := ModeB{Exten}; 

END; 


INC (i); 

WITH Table68K[i]} DO 
Mnemonic := "TAS"; 
Op := {14, 11, 9, 7, 6}? 
AddrModeA := ModeA{}; 


Mnemonic := "SUB"; END; 
Radinicah i= hod A{OpM68D} INC (4); 
= e : 
AddrModeB := ModeB{EAOSy}; WITH Table68K[i} DO 


INC (i); 


End Listing Sixteen 


(to be continued next month) 


END: Mnemonic := "TRAP"; 

: Op := {14, 11, 10, 9, 6}; 
INC (i); AddrModeA := ModeA{Data03}; 
WITH Table68K[i] DO ei ee := ModeB{}; 

Mnemonic := "SUBA"; ’ 

ldemedan’ ie dod A{OpM68A} INC (i); 

= e . , 

AddrModeB := ModeB{EA0Sa}; seo TableésK{i} DO 

END; nemonic := "TRAPV"; 
Op. = {14;,. ‘11510539, 6, S, 2,51 }3 
TNC.” ¢4))3 AddrModeA := ModeA{}; 
WITH Table68K(i] DO cant := ModeB{}; 
Mnemonic := "SUBI"; ; 
Op := {10}; 
° INC (i); 

AddrModeA := ModeA{}; 

AddrModeB := ModeB{Size67, EAOSe, Exten}; eer heaee 
ara Op..:= (14, 11,. 3}3 
INC (1); AddrModeA := ModeA{}; 

WITH Table68K[i]) DO Serres := ModeB{Size67, EAOSe}; 

Mnemonic := "SUBQ"; ; 

= A in edn 911} INC (1); 

xr = e ata : ; 

AddrModeB := ModeB{Size67, EAQSd}; Ree ay eee tees 
aa Op := (14,11, 10, 9, 6, 4, 
INC (1); AddrModeA := ModeA{Ry02}; 
WITH Table68K[i] DO AddrModeB := ModeB{}; 

Mnemonic := "SUBX"; 

Op := {15, 12, 8}; END; 


AVAILABLE 


BACK ISSUE 


1982 1983 1984 1985 1986 
#68—June #77—March #87—Jan. bs 40 een Oa #1414-Jan. 
#69—July #78—April #88—Feb. #104—June #112—Feb. 
#70—Aug. #79—May #89—March #108—Oct. #41413—March 
#71—Sept. #80—June #90—April #109—Nov. #114—April 
#72—Oct. #81—July #91—May #110—Dec. 

#73—Nov. #82—Aug. #92—June 
83—Sept. #93—July 

#84—Oct. #94—Aug. 

#85—Nov. #95—Sept. 

#86—Dec. #96—Oct. 

#97—Nov. 


TO ORDER: send $5 for 4 issue, $4.50 each for 2-5, $4 each 
for 6 or more to: Dr. Dobb’s Journal, 501 Galveston Drive, 
Redwood City, CA 94063 


Name 
Address 


City 
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HDTEST formats and tests hard drives in PC, XT, AT, and true compatibles. 
Written for production quality control; you know it’s fast and thorough. Menu- 
driven operation and context sensitive help windows make life easy when in- 
stalling or reformatting hard drives. Flag known bad tracks and do a com- 
prehensive surface scan to find unlisted defects. You can modify controller 
and test setup, load/save setup and defect files. Works with WD, Xebec, OM- 
Tl, DTC, and Adaptec controllers. Free HD Drive Park Program included! Call 
for more information. $99.00 

GALLERY 6 DISTRIBUTED BY PROTO PC, INC. 
2439 FRANKLIN AVENUE ST. PAUL,MN- 55114 
612-644-4660 TLX910-380-7623 
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FTL Modula-lIl 
$49.95! 


Your next computer language. The successor to Pascal, 
Modula is powerful. Why? Once a routine is written, it need 
never be recompiled. Programs work everywhere from Z80 
through VAX. 


FTL Modula-ll is a full Z8O0 CP/M compiler (MSDOS version 
soon)! It’s fast -- 18K source compiles in 7 seconds! The 
built-in split screen editor is worth $60 alone. Some stan- 
dard features: full recursion, 15 digit reals, CP/M calls, 
coprocesses, assembler and linker. The one-pass compiler 
makes true Z80.COM, ROMable code, too. Get the language 
you've waited for now. Only $49.95! 


FTL Editor Toolkit 


Full source to our split-screen programming editor. Curious? 


Want to customize to your tastes? Want sample Modula-ll 
code? This is perfect for you. Comes with all you need for 
your personal editor or terminal installer. Just $39.95! 


Workman and Associates 
112 Marion Avenue 
Pasadena, CA 91106 
(818) 796-4401 


We have over 200 formats in stock! Please specify your for- 
mat when ordering. Add $2.50 per order for shipping. We 
welcome COD orders! 
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THE CLOSEST THING TO COM 


FORTRAN PROGRAMMERS 


Downloading from mainframes or developing 
on the PC the choice is F77L. 


‘‘Lahey’s F77L FORTRAN is the compiler of choice... 
F77L compiled the five files in a total of 12 minutes which 
was 4 times as fast as MS FORTRAN and an astounding 
6 times as fast as Pro FORTRAN.”’ PC Magazine 


‘‘The manual that comes with this compiler is well put 
together. The messages are clearly explained, the com- 
piler’s unique features are well documented... All in 
all, F77L is a fine, well supported product that we think 
will do very well in the marketplace.’’ 

Computer Language 


VERSION 2.0 NOW AVAILABLE — $477 


Full ANSI FORTRAN-77 
Source On-Line Debugger 
Common/Array greater than 64K 
Lattice C and other 3rd Party Compatibility 


To order or for more information 


(213) 541-1200 


Lahey Computer Systems, Inc. 
31244 Palos Verdes Drive West, Suite #243 
Rancho Palos Verdes, CA 90274 


Requires MS-DOS and 8087 


MS-DOS and MS FORTRAN are trademarks of Microsoft Corporation 
Pro FORTRAN is a trademark of International Business Machines 
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LISP 


MON LISP AVAILABLE FOR YOUR PC 


APPLICATION SUPPORT EXTENDABILITY 
Bignums, for high precision arithmetic Save and restore full environments defstruct, to add data types 
8087 support, for fast floating point User-specified initializations Macros, to add control constructs 
Arrays, for multidimensional data Assembly language interface Read macros, to extend the input syntax 


Streams, for device-independent i/o 
Packages, for partitioning large systems 


Extendable arithmetic system 
Customizable window system 


Characters, strings, bit-arrays 8088 or 8086 CPU, MSDOS Operating System 
390K RAM or more DEBUGGING SUPPORT 


FULL SET OF CONTROL PRIMITIVES 
flet, labels, macrolet, for local functions 
if, when, unless, case, cond, for conditionals 


step, for single-stepping 


IOCLISP trace, for monitoring 


break, for probing 


Keyword parameters, for flexibility 5%’’ diskettes inspect, for exploring 
Multiple-valued functions, for clarity and manual $300.00 Flexible error recovery 


Flavors, for object-oriented programming 
Stacks, for coroutining 
Closures, for encapsulation 


sort, for user-specified predicates 
Transcendental floating point functions 


String handling functions Washington State residents add sales tax. 


Foreign orders add $30.00 for airmail. Customizable pretty-print 
U.S. Shipping included for prepaid orders. — 


MSDOS INTERFACE 
Random access files 


LARGE C LEMENT OF FUNCTIONS | q Integ ral Qual ity Hierarchical directory access 
Mappers, for functional programming PO. Box 31970 MSDOS calls 


format, for output control Seattle, Washington 981 03 DOCUMENTATION 


(206) 527-2918 On-line documentation of functions 


apropos 


Over 400 functions altogether VISA and MASTERCARD accepted. 300-page indexed reference manual 





CACHE22+ CP/M 2.2 
= CP/M Max! 


CACHE22 is a front-end system pro- 
gram that buries all of CP/M 2.2 in 
banked memory. It helps 8080/Z80 
computers to survive by providing up 
to 63.25K of TPA, plus the ability to 
speed disk operations, eliminate 
system tracks, and run Sidekick-style 
software without loss of transient 
program space. Complete source and 
installation manual, $50.00. 


CP/M is a trademark of Digital Research Inc. 
Sidekick is a trademark of Borland International 


53 Abbett Avenue, Morristown, NJ 07960 
(201) 267-1210 





If you're a C programmer (or want to be one), we 
speak your language. Subscribe to The C Journal 
today, and start increasing your productivity right 
away. We give you information you can use on any 
machine — IBM PC™, UNIX™-based, Macintosh”, or 
CP/M™ — micro, mini, or mainframe. 


@ in-depth reviews and feature articles — C com- 
pilers, editors, interpreters, function libraries, 
and books. 

e hints and tips — help you work better and 
faster. 


e interviews — with software entrepreneurs that 


made it — by using C. 
@® news and rumors — from the ANSI standards 


committee and the industry. 
Limited Time Offer 


Join our thousands of subscribers at the Discount 
Rate of only $18 for a full year (regularly $28)! Call 
us now at (201) 989-0570 for faster service — don't 
miss a single issue of The C Journal! 


Please add $9 for overseas airmail. 


Trademarks — CP/M: Digital Research Inc. IBM PC: IBM 
Corp. Macintosh: Apple ComputerCorp. TheCc Journal: 
InfoPro Systems. UNIX: AT&T Bell Labs. 


infoPro Systems MasterCard 
Denville, NJ 07834 a 
(201) 989-0570 s 
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‘CRYPTOGRAPHER’S 
TOOLBOX 


Listing One (Text begins on page 58.) 





** cypher.c File Cypher Program by F.A.Scacchitti 9/11/85 
*x 


ae Written in Small-C Version 2.10 or later 

xx 

ae Copies from original file to encrypted file 

ae using cypher key(s) passed to encode or decode. 
=f 


#include <stdio.h> 
#define BUFSIZE 16384 


int fdin, fdout; /* file i/o channel pointers */ 
int n, count; 
char *inbuf, *key; 


main(argc,argv) int argc, argv[];: { 
inbuf = malloc (BUFSIZE); 


/* 
** Open file streams 
ey. 
if(arge < 4) { 
printf("\ncypher usage: cypher <source file> <new file> 
<keyl> <key2> . . . <keyN> <CR>\n"); 
exit(); 


} 
if((fdin = fopen(argv[(1],"r")) == NULL) { 
printf("\nUnable to open $s\n", argv[1]); 
exit(); 
} 
if((fdout = fopen(argv[2],"w")) == NULL) { 
printf("\nUnable to create %ts\n", argv[2]); 


Sa 


~ 


/* 
*x Read file - encode it - write new file 
x / 
do { 
printf("-reading file\n"); 


count = read(fdin, inbuf, BUFSIZE); 
n=3; 
while(n++ <argc) { 
key = argv(n-1); 
cypher (inbuf, count, key) ; 
printf "-writing td byte file\n\n", count); 
write (fdout, inbuf, count); 
} while(count == BUFSIZE); 
/* close up shop */ 


fclose(fdin); 
fclose(fdout); 


End Listing One 


Listing Two 


i? cypherl.c Cypher module by F.A.Scacchitti 
xk 10/10/85 

xk 

ae Simple cypher module - encodes directly with user keys 

xx 

+7 


#include <stdio.h> 
static int i, n, keylength; 


cypherl (buffer, num, code) char *buffer, *code; int num; { 


/* 
** get keylength for each key 
wy 


keylength = 0; 
while (code[keylength++] != NULL); 
keylength--; 


/* 
** encrypt the file with each key 
sf 
printf ("-encoding/decoding buffer\n"); 


i<=num; i++) 


for (i=0; 
buffer{i] = buffer[i] * code[i % keylength]; 


=0 
iff 


End Listing Two 
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Listing Three 


/* 
xx 
xk 
xk 
x * 
xx 
x* 


+7 


cypher2.c Cypher module by F.A.Scacchitti 


10/11/85 


Complex cypher module - generates a key of some prime length 
between 1024 and 2028 bytes then 
encrypts the buffer with this key 


#include <stdio.h> 


#define NEWBUF 2000 
#define NUMPRIMES 50 


static int i, n, index, length, sum, keylength; 
static char *newkey; 


static int prime[] = {1009, 


cypherl (buffer, num, code) char *buffer, 


/* 


xx 


ts 


/* 


x* 


“7 


/* 


xx 


i 


/* 


xk 


*/ 


/* 


xx 


*/ 


1359, 
1021, 
i973, 
1051, 
19i3, 
1091, 
1877, 
1117, 
1847, 
1163, 


1013,.:1997, 
1987, 1031, 
1039, 1951, 
1933, 1061, 
1069, 1907, 
1889, 1093, 
1103, 1873, 
1867, 1123, 
S132, +831, 
s8TS 7-24 41, 


1019, 
1979, 
1049, 
1931, 
1087, 
1879, 
1109, 
1861, 
1153, 
1803}; 


1993, 
4033, 
1949, 
1063, 
4961, 
1097, 
1871, 
1129, 
1823, 


*code; int num; { 


allocate a buffer for the generated key 


newkey = malloc(NEWBUF) ; 
get keylength and sumcheck for each key 


keylength = sum = 0; 
while((n = code[keylength]) != NULL) { 
sum += nN; 
keylength++; 


Select a prime and generate a new key that length 


length = prime[sum % NUMPRIMES]; 
printf("-generating a %d byte key\n",length); 
for(i=0; i<length; i++) { 

index = i % keylength; 

sum = code[index] + sum & 255; 


newkey[i] = code[{index] * sum; 
} 


encrypt the file with the generated key 
printf ("-encoding/decoding buffer\n"); 
for(i=0; i<=num; i++) 

buffer[{i] = buffer[{i] * newkey[i % length]; 


get rid of the buffer 


cfree (newkey) ; 


End Listing Three 


Listing Four 


/* 
xx 
xk 
xx 
ak 
xx 
x* 
x* 
x* 
x* 
xx 
x* 


= 


by F.A.Scacchitti 
11/09/85 


cypher3.c Cypher module 


Complex cypher module - generates a key of some prime length 
between 1024 and 2028 bytes then 
encrypts the buffer with this key 

or 
if key starts with a '-‘ (dash) 
calculate a transposition block size 
and invert (transpose) the file in 
this size blocks 


#include <stdio.h> 


#define DASH 45 
#define NEWBUF 2000 
#define NUMPRIMES 50 


(continued on next page) 
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Productivity Tools from SCE 


@ The Seid] Make Utility (SMK) is the most powerful make 
utility you can buy for MS-DOS. When changes are made to 
any program module, SMK will issue only those commands nec- 
essary and sufficient to rebuild the system. SMK uses a super 
fast, proprietary dependency analysis algorithm that analyzes 
all dependencies before rebuilding any files. SMK understands 
complicated dependencies involving nested include files, source, 
and object code libraries. A high-level dependency definition 
language makes setting up dependencies easy. It supports pa- 
rameterized macros, local variables, for loops, constants, include 
files, command line parameters, in-line and block comments, full 
pathname and directory support, and more! Works with most 
compilers, assemblers, and linkers. $99.95 


® The Seidl Version Manager (SVM) is a state of the art 
version control system for MS-DOS. It maintains a complete re- 
vision history of any text file, without duplication, and can re- 
build any previous version of the file. SVM has highly optimized 
compression routines included for large projects and archiving. 
Other features include: full pathname and directory support, 
wildcards, exception cases, on line help, typeset documentation, 
tutorial, automatic error recovery, and much more. SVM is ideal 
for all software and text development projects. No other version 
management system delivers the features, performance, and re- 
liability of SVM. $299.95 


© SMK+SVM together form an extremely powerful, fully in- 
tegrated set of productivity tools. $379.95 


SEIDL COMPUTER ENGINEERING 


1163 E. Ogden Ave., Suite 705-171 
Naperville, IL 60540 
(312) 983-5477 











The Developer's kit contains all features of the 
Datalight C compiler plus support for LARGE MENM- 
ORY MODEL, ROMable code, third-party debuggers 
and the complete source for all library functions 
and start-up code. 















puters. Datalight C features fast compile time, DLC 
cat, forep, diff wc, and pr. 
| 21.8 | 22.7| 24. 
VISA and MasterCard accepted. Add $3 shipping ($5 UPS BLUE). Outside USA 


Circle no. 114 on reader service card. 
one-step compile command, a MAKE program, full 
Datalight C provides tight, fast, production-quality code as 
Getc/Putc 62.2 62.2 
add $15. Washington State residents add 7.9% sales tax. 


The Datalight C compiler is a full-featured UNIX | 
System 5 compiler for PC and compatible com- ¢ 

8087 and software floating point, and Lattice C 

compatibility. The library contains UNIX standard 

functions and PC specific functions with easy access to DOS/ BIOS 
functions. The package includes source code for UNIX-like tools: 
shown in the following table (excerpt from “The State of C," 
PC-TECH Journal, January 1986, used with permission). 
[Jv atalignt | eco] tattice | microsoft [ mark wms 
Datalight 

11557 8th Ave. N.E.. g 

Seattle, Washington 98125 

(206) 367-1803 

Requires MS-DOS 2.0 or later, 2 DSDD disks. 

Lattice C, a trademark of Lattice Corp. MS-DOS, a trademark of Microsoft. 
UNIX is a trademark of Bell Labs. 
Circle no. 203 on reader service card. 
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AN Ee time your company requires volume 
diskette duplication is the right time to 
call Disclone. 
We can customize your diskettes (sleeves too). 
We can coordinate your distribution. We can ful- 
UM oleae ese Ce 
Disclone full service quality tested diskette 
duplication, packaging, documentation produc- 
tion and processing ensures precise duplication 
and thorough quality control. Disclone is ready 
with technical support, personal service and 
competitive prices. 
Disclone provides expedience without sacrific- 
ing excellence. Committment dates are guaran- 
teed. Fast turnover 

@ up to 1000 in 24 hours, any format. 

@ up to 10,000 in one week, any format. 


lava ayy a 
DISCLONE SOFTWARE PRODUCTION SERVICES 


1050 North Fifth Street, San Jose, California 95112 
(408) 947-1161 OUTSIDE CA: 1-800-826-4296 





Circle no. 204 on reader service card. 


F TRIS ; 
F Pam Me eR 


You'll get more from your PC with these 22 handy 
utilities for DOS 2 & 3. We are making this offer to 
introduce you to our quality software products. 
Normally $30, get them now for only $5 (plus 
shipping and handling). 

REN Between Move files from one directory to another on the same 


Directories disk without wasting time and space by copying. 
Rename Change the name of a directory of files instead of 
Directories making a new directory and copying the files. 
Extended Get more information about the files in a directory. See 
Directory List — the attributes of files. List systern and hidden files. 
Directory List all or a subset of files and directories. List sub- 

Map directories. Search entire disk for specified files. 

Volume Change or add volume name (label) to any working 
Name disk. 





Control File Hide and unhide files for security. Protect files by 
Flags making them Read-Only. 


plus 10 Some re-format ASCII (text-like) files so that they can 
filters be easily printed or edited. TAB and UNTAB to save 


space. 
Order Today! Only $500! 


—Plus $1.50 for shipping and 
handling. Ohio residents 
include 612% sales tax (33¢) 


Write or call — 


Computer Thaumaturgy, Inc. 
1212 Miami Valley Tower 

40 West Fourth Srreet eae ee for delivery or 
Dayton, Ohio 45402-1828 use Our express service — only $1 more! 
513/461-2126 Offer expires June 30, 1986. 


SPECIAL OFFER— 
For users of the less a 
IBM PC/XT/AT ED 
and Compatibles! ae L 
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Listing Four 


(Listing continued, text begins on page 58.) 


static int i, j, n, index, length, sum, keylength; 

static char *tbuff, c; 

static int prime[] = {1009, 1999, 1013, 1997, 1019, 
19935. 20213" L98h. t65),...19739, 
1033;-:1973, 1039, 1951,°2043, 
1949-13051; 1933, 1661; 1931, 
L063, (11913, 1069, 1907, -1087, 
£901," LO91,- 1889,.° 1093; 2138 79; 
169757 L877, 4103, 1873; 1109, 
1SZE D6 -LILZ,...1867,.. 1223; 47861, 
1129. .58475°37515. 18325 1153, 
823, 1163. 1813. LL} 2803)}% 


cypher (buffer, num, code) char *buffer, *code; int num; { 


/* 
** allocate a buffer for the new key or transposition 
af 


tbuff = malloc (NEWBUF) ; 


/* 
** get keylength and sumcheck for each key 
*/ 


keylength = sum = 0; 

while((n = code[keylength]) != NULL) { 
sum += n; 
keylength++; 


/* 
** do we transpose or encode ? 
*/ 
if((c = *code) == DASH) 
transpose (buffer, num, code); 


else 
encode (buffer, num, code); 


/* 
** get rid of the buffer 
ny 
cfree (tbuff) ; 
} 
/* 
** Here's where we transpose 
wf 
transpose (buffer, num, code) char *buffer, *code; int num; { 
length = (((sum + keylength) % 16) & 15) + 2; 
printf("-transposing file by %d\n", length); 
index = 0; 
do { 
for(i = 0; i < length; i++) { 
j = length - i - 1; 
tbuff[(j]) = buffer[index + i]; 


} 

for(i = 0; i < length; i++) { 
buffer[index + i] = tbuff[i]; 

} 


index += length; 
}while (index < count); 


} 

/* 

** Here's where we encode 
x/ 


encode (buffer, num, code) char *buffer, *code; int num; { 


/* 
** Select a prime and generate a new key that length 
me 
length = prime[sum % NUMPRIMES]; 
printf("-generating a %d byte key\n", length); 
for(i=0; i<length; i++) { 
index = i % keylength; 


sum = code[index] + sum & 255; 
tbuff[i] = code[index] * sum: 


/* 
** encrypt the file with the generated key 
“f 

printf ("-encoding/decoding buffer\n"); 


for (i=0; i<=num; i++) 
buffer({i] = buffer[i] * tbuff[{i % length]; 


} End Listing Four 
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TS 


Listing Five 


~ 

.* fv.c File View/Compare Program by F.A.Scacchitti 9/11/85 
<- Written in Small-C Version 2.10 or later 

oh Dumps contents of single file to screen 

= Dumps contents of 2 files and xored difference 
2 Displays in hex and ascii form 


#include <stdio.h> 
#define BUFSIZE 1024 


int fdinl, fdin2; /* file i/o channel pointers */ 
int i, j, k, val, count, total, offset, numdisp; 
char *inbufl, *inbuf2, *difbuf, c; 


main(argc,argv) int argc, argv[]; { 


switch (argc) { 
case 2: 
case 3: 
inbufl = malloc(BUFSIZE) ; 
if((fdinl = fopen(argv(1],"r")) == NULL) { 
printf("\nUnable to open %s\n", argv[1]); 
exit (); 
} 
numdisp = 1; 
if(argce == 2) break; 
case 3: 
inbuf2 = malloc(BUFSIZE) ; 
difbuf = malloc(BUFSIZE); 
if((fdin2 = fopen(argv[2]),"r")) == NULL) { 
printf("\nUnable to open %s\n", argv[2]):; 
exit(); 
} 
numdisp = 3; 
break; 
default: 
printf("\nfv usage: fv <filel> - 
printr(" fv <filel> <file2> - 
exit(); 
} 
total = offset = 0; 


dump file\n"); 
compare 2 files\n"); 


prantct(*\n*) ; 


do { _ 
count = read(fdinl,inbufl,BUFSIZE); 
if(arge >= 3) { 
read (fdin2, inbuf2, BUFSIZE); 


for(i=0; i< count; i++) 
difbuf[({i] = inbufl[i}] * inbuf2[i]; 
} 


for(i=0; i< count; i+=16) { 
for(k=1; k <= numdisp; k++) { 


switch (k) { 

case 2: 
offset = BUFSIZE; 
break; 

case 3: 
offset = 2 * BUFSIZE; 
break; 

default: 
offset = 0; 
break; 


} 
if(k < 3) 

printf ("f-%d", k); 
else 

printf ("dif"); 
printf(" %04x ",it+total); 
for(j=0; j<=15; j++) { 

val = inbufl[i + j + offset]; 

printf ("02x ",val < 0 ? val - 65280 : val); 


if((c = bdos(6,255)) == 19) { 
if((c = getchx()) == 3) 
exit (); 


/* hold on *S */ 
/* exit on *C */ 


} /* continue on “*Q */ 


} 
Srincr (=< 


for(j=0; j<=15; j++) { 
c = inbufl[i + j + offset]; 
at{e > 31) 
putchar(c); 
else 
if (c==0) 
putchar (61); 
else 
putchar (94); 


} 
printf("\n"); 
if(k == 3) printf("\n"); 
} 
} 
total += count; 
} while(count == BUFSIZE); 


(continued on next page) 


Dr. Dobb’s Journal, May 1986 


ee eet 


Programming the 


65816 Microprocessor 
Including 6502 and 65C02 


a 


And run 1,000’s of CP/M programs 
up to 30% faster, directly from your CP/M disks! 


How does it work? 

RUN/CPM virtually trans- 
forms your PC into any of 
the most popular CP/M 
systems. A simple replace- 
ment of your PC’s 8088/86 
microprocessor with our 
N.E.C. V-20/30 micro- 
processor gives your com- 
puter the ability to run both8 
bit CP/M and 16 bit MS-DOS 
programs. RUN/CPM will 


To order 
send check or money 
order (U.S. funds) 


add $5.00 shipping/handling. 


transform your PC's floppy 
drives into CP/M drives able 
to directly read, write, and 
format over 100 CP/M disks! 
Terminal emulation suppor- 
ting dozens of the most 
popular terminals completes 
the transformation of your 
PC into a CP/M system. 


Performance? 

Depending on the applica- 
tion, many of your CP/M pro- 
grams will run up to 30% 
faster on your PC. Other 
features include; ability to 
run CP/M programs in color, 
logical and physical drive 
assignments, run CP/M or 
MS-DOS programs from the 
same prompt. RUN/CPM is 
the solution to running CP/M 
software on PC's. 


Micro Interfaces Corporation 
6824 N.W. 169th Street, Miami, Florida 33015 


(305) 823-8088 


Telex 5106004680:MICRO INTER CO 
Ask About Our Intel Operating System Interfaces 


- ORDERS ONLY 


OEM, VAR, Dealers, Inquiries Invited 


#9 1-800-637-7226 


Trademarks CPM (Orgital Research inc 


18M (1BM Corp) RUN/CPM (Micro intertaces Corp) MS OOS (Microsoft inc } INTEL (intel Corp) 
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MODULA-2 


DEVELOPMENT BUILDING BLOCKS 





REPERTOIRE, from PMI. High-performance tools. 
Screen display system. Multi-window editor. 
Full source, so your programs can 
follow when you change machines. 


Screen System. 









REPERTOIRE won’t bloat your programs because it doesn’t 
generate code. Create screens exactly as they will look, then 
compress them into one dense, rapid-access file. REPERTOIRE 
lets your program display a screen instantly in any window with a 
single function call. Screens check user input, scroll within 
windows, give context-sensitive help, and conditionally branch to 
other screens using natural-language analysis functions that you 
imbed in the screens. 


Editor. 


REPERTOIRE’s full-screen multi-window editor fits neatly into 
your programs. It lets your users create and edit multiple files 
concurrently. 
















High-Performance Low level Routines. 


REPERTOIRE provides improved DOS and BIOS access, 
speaker control, string tools, list handling, and a sample 
directory manager. 









Excellent for educational software or any other screen-intensive 
application. For IBM compatibles. Manual and two 360K 
diskettes. Logitech & ITC versions, $64 each. Both versions for 
$84. Check/MC/VISA. Send for FREE documentation and 
demo disk to find out more. 










4536 S.E. 50th Portland, OR 97206 (503) 293-7706 
PMI MCI Mail: PMI; Compuserve: 74706,262 
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Power Tools for 
system builders™ 









Call today for our free catalog of design aids, com- 
pilers, libraries, debuggers, and support tools for 
Apple and IBM micro computers. The Power Tools 
catalog includes product descriptions, warranty and 
license terms, and all the information you need to 
make an intelligent purchase decision. 














TSF offers technical support, competitive pricing, 
free UPS shipping on orders over $100, and a reason- 
able return policy. Visa, MasterCard, and American 
Express accepted without surcharge. TSF helps you 
get your job done. 























Sample Prices: 
Microsoft C $259 
MASM 4.0 $109 
Turbo Pascal $45 
Mark Williams C $375 
Lets C $59 
Wendin OS Toolbox $89 
Blaise Async Manager $137 

¢ San Francisco * CA 94105 


(a) TSF ss 


The Software Family™ 


Call Toll Free 
24 hrs a day/7 days a week 














Ask For Operator 2053 


800-543-6277 
Calif: 800-368-7600 











° Dept C-1 * 649 Mission Street 
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Listing Five 


(Listing continued, text begins on page 58.) 


/* close up shop */ 


fclose(fdinl); 
if(argce == 3) 
fclose (fdin2); eee. e 
End Listing Five 


Listing Six 


#in 
#de 
int 
int 
int 
int 
int 
cha 


mai 


/* 


xk 


s/ 


/* 


fstat.c File Statistics Program by F.A.Scacchitti 10/8/85 


Written in Small-C Version 2.10 or later 


Scans file 
characters. 
Calculates and displays mean, mode, median 
and range of file. 

Displays histogram of distribution. 


and displays distribution of 


clude <stdio.h> 
fine BUFSIZE 16384 


fdin; /* file pointer */ 

i, j, temp, value, count, total, *file, *sorted; 

sum, hisum, meansum, himeansum, mean, eflag, changing; 
median, oddmedian, range, min, max, mode; 

*data, scale; 
roc, *inbuf; 


n(argc,argv) int argc, argv[]:;: { 


if(arge < 2) { 
printf("\nfstat usage: fstat <input file>\n"); 
exit(); 

} 

if((fdin = fopen(argv[{1],"r")) == NULL) { 
printf("\nUnable to open file %s\n",argv[1]); 
exit(); 

} 


inbuf = calloc(BUFSIZE,1); 

file = calloc(256,2); 

sorted = calloc(256,2); 

data = calloc(17,2); 

eflag = FALSE; 

sum = hisum = meansum = himeansum = mean = mode = j = 0; 


printf("reading the file-"); 


do { 
count = read(fdin, inbuf, BUFSIZE); 


for(i=0; i< count; i++) { 


value = inbuf[i]; 


if(value < 0) 
value = 256 + value; 
file[value] ++; 
if(++sum =— 10000) { 
hisum++; 
sum =0; 
} 
if((meansum += value) >= 10000) { 
himeansum++; 
meansum -= 10000; 
} 


} 
} while(count == BUFSIZE); 
Calculate the mean 


printf ("calculating mean-") ; 


do { 
if((meansum -= sum) < 0) 

if (himeansum > 0) { 
himeansum--; 
meansum += 10000; 

jelse{ 
meansum += sum; 
eflag = TRUE; 
mean--; 


} 
if((himeansum -= hisum) < 0) { 
himeansum += hisum; 
eflag = TRUE; 
jelse{ 
meantt+; 


} 
}while(eflag == FALSE); 
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NOT COPY 
PROTECTED! 


** Calculate range, find mode min and max, fill the sorted array 
“4 






printf("calculating range-"); 
min = max = file[0]; 


for(i = 0; i <= 255; itt) { 
sorted[{i] = file[i]:; 
if (file[{i}] > max) { 
max = file[i]; 
mode = i; 


} 
if(file[{i] < min) 


min = file[i]; 
} 


range = max - min + 1; 


/* 


** Sort the sorted array to calculate median 
/ 


printf ("sorting the array"); 
changing = TRUE; 


while (changing) { 
changing = FALSE; 
for(i = 0; i <= 254; itt) 
if (sorted[i] > sorted[i+1)]) { 
temp = sorted[i]; 
sorted[i] = sorted[i+l]; 
sorted[it+1l] = temp; 
changing = TRUE; 
} 
} 





median = (sorted[128] + sorted[127]) / 2; 
oddmedian = (sorted[128] + sorted[127]) % 2; 
/* 
> Display the results 
Sybil is an Advanced Diagnostics disk... 
Se hyde ity ge oe. pe Bers A ancl She can low format hard disks just like 
Advanced Diagnostics (IBM, Compagq, etc.) and 
for(i = 0; i <= 255; itt) { ; 
printf("%5d", file[i]): she can do system and memory tests which 
ee provide even more information than Advanced 
cy ‘ ; Diagnostics does. $245.00 cheaper than IBM's 
printf("\n %d%04d characters read idle anke ae tenis Advanced Diagnostics! 
printf("file mean = td ",mean); 
if ( ae i MB elo = ‘ Sybil is a Disaster Recovery program se 
prance (™ : rete eee She can recover hard disks that have been ac- 
tf u u : . . 
Reieectetile mechan — sd, eaten) Pee iy te some concen Ser 
if (oddmedian) 
age ier Sh to the format. Truly amazing! 
: f qe "); 
ait here™ file range = td [ min = %&d max = $d j\n", Sybil is a Graphics Editor. ponies): 
printf("\nDepress spacebar to display latooran’ ©; oe . ee < either ane Dee we eeee 
getchar(); or onochrome monitors in hig 
/* characters. Perfect for creating Binary Image 
: Sum the data in 16 groups of 16 elements and find max. value Files. The Binary Image Files can be converted 
Bee tte vs. 4 Wk bce “dase to Assembly and then linked to other lan- 
for(j = 0; 3 <= 15; j++) guages, such as your favorite Pascal, C, or com- 
it (datali] > max) ee Fee eee piled BASIC program. Includes source code. 
Lo Sybil Is a File Wizard... 
/* 
ete eotaGe acnting ok pact Sybil can backup files by date, by time, or by 
ep ene size. She can find any file (or files) anywhere on 
comer ke et SOG. your hard or floppy disks, even if you haven't 
ee the vaguest notion. She can edit file attributes 
printf(" scale = %4d\n\n", scale); with the greatest of ease, unerase files, edit 
/* sectors, and globally change time and date 
re ee ee ee ee stamps. All her file utilities understand paths 
and wildcards. 
for(i = 0; 4 <= 15; i++) { , : : 
printf ( $3d to $3d = 5d || ali 16, are eee Sybil is also a ae 
ee ee se eee RAM Disk, Print Spooler, General Regular 
a etter ety es Expression Parser and, Advanced File 
id -- 0) 
mares ee Comparator. 
5 ee Order Sybil Today! . 
js Call 800-922-3001, in Colorado, 
** close up shop 303-444-1 542 
x/ = == 
fclose(fdin); s&s 
: | SOPHCO 
SSE 


a PO Box 7430 
SEES Boulder, Colorado 80306 





(continued on next page) 
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_ THE HAMMER 


Software Tools in C 


“| have already saved weeks of coding . . . thank you for providing 
such a useful tool..." - G.T. 






Let The HAMMER Library of over 150 routines save you valuable 
development time and effort: 


LIBRARY FUNCTIONS 
e Multi-level 123-like MENUS 
e DATA ENTRY 
MULTI-FIELD mode for Full-Screen data entry 
Single-Field mode for individual fields 
Data Verification 
Full Editing within each field 
Strings, dates, and fixed decimal numbers 
e “Option” fields force user to pick from a given set 
e SCREEN MANAGEMENT 
® cursor positioning 
e full attribute control 
e Date/time/string conversions 
e BIOS access/pattern matching/and more 


UTILITIES 
e HARC- -complete Source File Archiver 
¢ HAMCC -compile designated source modules residing 
WITHIN an archive file under any of the supported 
compilers and optionally place resulting object 
modules in a library. 


SUPPORTED C COMPILERS: 
Microsoft C 3.00 e Cl-C86 ¢ Mark Williams C86 
DeSmet C e Lattice 


INCLUDES source code and manual 














e® display boxes & tables 
e scrolling and clearing 











$195 plus shipping 
VISA/MC accepted 






O0.E.S. SYSTEMS 
1906 Brushcliff Rd. e Pittsburgh, PA 15221 e 412/243-7365 


Looking for the right tool for the job? 
REACH FOR THE HAMMER 
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The First ldea-Processor For Programmers. 
Fir sTime" Has features no other editor has. 


Fast program entry through single keystroke statement generators 

Fast editing through syntax oriented cursor movements 

Dramatically reduced debugging time through immediate syntax checking. 

The error checking is thorough and includes semantics « Undefined variables, 
types and constants * Assignment statements with mismatched types 

¢ Errors in inciude files and macro expansions 


C}.0-O- 


[J] Automatic program formatter (you specify the rules) 

(} Command DOS from FirsTime 
C) Reading a file with errors moves cursor automatically to point of error 

(} Unique programmer-oriented features 


(] Split Screen editing 


* zoom command gives top-down view of program logic 

* view macro command shows expansion of a C macro in the editor 

* view/update include file allows you to view and update an include file 
¢ transform command allows you to transform statements to related ones 
¢ search for next error command 













































; 


IT 
iF 


Seenac a 


© (NEKO 65 


i! 


) | iM | 


sie] ||) 


FirsTime for Turbo Pascal $ 74.95 










To Order Call: (201) 741-8188 or write: 
SPRUCE TECHNOLOGY CORPORATION 


FirsTime for dBase III $125.00 
FirsTime for MS-Pascal $245.00 
PO. Box 7948 FirsTime for C $295.00 


Shrewsbury, NJ 07701 
FirsTime is a trademark of Spruce Technology Corporation *« MS-DOS is a trademark of 
Microsoft Corporation * IBM is a trademark of International Business Machines inc 
* Turbo Pascal is a trademark of Borland International * dBase Ill is a trademark of Ashton-Tate. 


oS 
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Listing Six 


(Listing continued, text begins on page 58.) 


chkkbd(){ char c; 


if((c = bdos(6,255)) == 19) /* hold on *S */ 
if((c = getchx()) == 3) 
exit(); /* exit on *C */ 


/* continue x / 


End Listing Six 


Listing Seven 


/* 
xk 
xx 
x* 
ak 
x* 
ak 
xk 
x* 


ay 


makef.c File Generator Program by F.A.Scacchitti 10/7/85 


Written in Small-C Version 2.10 or later 


Creates a seqential file of characters from 
0 to 255 in blocks of 255 bytes. 

The sequential characters can be replaced 
with any single character desired. 


#include <stdio.h> 


#define BUFSIZE 256 


int fdout; 


/* file i/o channel pointers */ 


int i, n, num; 
char *outbuf, value; 


main(argc,argv) int argc, argv[]; { 


/* 


xx 


“7 


/* 


xx 


a7 


/* 


xx 


*/ 


/* 


ak 


*y 


/* 


xk 


ey 


/* 


zk 


ef. 


/* 
xk 


gj 


Allocate memory for buffer 
outbuf = malloc(BUFSIZE); 


Check arguments passed and open file stream 

if(arge < 3) { 
printf ("\nmakef usage: makef <new file> <nnnn> [ddd] \n"); 
printf(" nnnn = file size in 256 byte blocks\n"); 
printf(" ddd = optional alternate value in decimal\n") ; 
exit(); 

} 

if((fdout = fopen(argv[1},"w")) == NULL) { 
printf("\nUnable to create %s\n", argv(1]):; 
exit(); 

} 


Convert file size argument to integer 


if((n = atoi(argv(2])) == NULL) exit(); 


Fill the buffer with 0 to 255 sequence 
for(i = 0; i <=255; i++) 

outbuf[i) = i; 
Refill the buffer with a single character if directed by argument 
if(arge == 4) 

if((value = atoi(argv[3])) < 256) 

for(i = 0; i <=255; i++) 
outbuf[{i}) = value; 

Write blocks to file 
for(i=1; i <= n; i++) 

if((num = write (fdout,outbuf,BUFSIZE)) < BUFSIZE) exit(); 
Close up shop 
fclose(fdout) ; 


End Listing Seven 


Listing Eight 


/* 
xk 
xx 
xx 
x* 
a* 
xk 
ak 


sp.c Search Pattern Program by F.A.Scacchitti 10/15/85 
Written in Small-C Version 2.10 or later 


Searches file for repetitive pattern. 
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*/ 

#include <stdio.h> 

#define BUFSIZE 16384 

int fain; /* file i/o channel pointers */ 
int i, j, n, block, start, depth, count, limit; 

char *c, *inbuf; 


main(argc,argv) int argc, argv[];: { 


/* 
** Set defaults 
“9 
block = 128; 
depth = 4; 
start = 0; 
/* 
** Allocate memory for buffer 
“= 
inbuf = malloc(BUFSIZE); 
/* 
** Check arguments passed and open file stream 
af 
if(arge < 2) { 
printf("“\nsp usage: sp <source file> [nnnn]} [dddd) [ssss]} [x])\n"); 
printf (" nnnn = block size to search default = 128\n"); 
printf (" dddd = minimum depth of comparison default = 4\n"); 
printf (" ssss = starting point in buffer default = 0\n"); 
printf (" x - any char. gen's difference buffer ((n+1)-n)\n"); 
exit(); 
} 
if((tdin = fopen(argv[({1},"“r")) == NULL) { 
printf("\nUnable to open %s\n", argv(l]);: 
exit(); 
} 
/* 
** Convert optional inputs to integer and implement 
=/ 
if(arge > 2) 
i£((n = atoi(argv[2])) !=— NULL) 
block = n; 
if(arge > 3) 
if((n = atoi(argv(3])) != NULL) 
depth = n; 
if(argce > 4) 
if((n = atoi(argv(4])) != NULL) 
start =n; 
/* 
** Fill the buffer with as much as possible 
“7 


count = read(fdin,inbuf, BUFSIZE); 
limit = count - depth; 


/* 
** If there's a sixth argument, convert the file to numerical sequence 
=} 


if ¢arge, > SP 
for(i = 0; i < count - 1; itt) 
inbuf[(i} = inbuf{i + 1) - inbuf{[i]; 
} 


for(i = start; i < block; i++) { 
printf ("%c", 41 8 10 —= 0) 7 ht FF oth 
chkkbd(); 
for(} =< i + iz 3 <= limit: 3++) 
if(inbuf[i}) \-= inbuf[j)) { 
if((n = chkdepth(i, j, 0)) >= depth) 
printf("\nmatch at %d (%x hex) and %d (%x hex) — 
td deenin”, 1, i, j. 3. nd: 
if(n >= block) exit(): 
} 
} 


/* 
** Close up shcp 
“7 
printt ("in"): /* Flush print buffer */ 


fclose(fdin); 
} 


chkdepth(pointer, offset, k)int pointer, offset, k:{ 


while(inbuf[pointer] <= inbuf[offset] && k < count) { 
pointer+t+; 
offsettt; 
k++; 

} 

return (k); 


} 
chkkbd () { 
char 6 


if((c = bdos(6,255)) == 19) { /* hold on “*S */ 


if((c = getchx()) == 3) 
Sxi-t ti) 5 J*, Extt. on -“E */ 


} /* continue = ‘*/ 


End Listings 
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“MAKE YOUR IBM-PC 
CP/M COMPATIBILE” 


Intersecting Concepts Announces 
3 Solutions To Solve Your 
Computer Incompatibility! 


44 B ut will it work on my computer?” YES! 

Finally, there are three easy ways to exchange 
information, transfer files, and run CP/M software on 
MS-DOS machines. 


1. MEDIA MASTER" is our direct disk- 
MEDIA to-disk format conversion program. 
ER Already an accepted industry standard, 
Disk to-Disk this $39.95* program uses simple screen 
“a “| | prompts that lets you read, write 
and format up to 150 different 5 1/4” 
diskettes from CP/M, MS-DOS and 
PC-DOS operating systems. So if you 
work on a IBM PCompatible at the 
office, but use a CP/M computer at home, now you can 
easily transfer files that would otherwise be “foreign” to 
your computer’s operating system. 


2. MEDIA MASTER PLUS™ goes one 
MEDIA step further by converting 8-bit CP/M 
software to run on 16-bit MS-DOS and 


Pla PC-DOS machines. This newly released 
Seas | | $59.95 product combines our IBM-PC 
ew 8 Ctra version of Media Master with ZP/EM, a 


powerful new emulation program. The 
results are amazing: CP/M programs 

-| using 8080 instructions and data can be 
enktesed from popular computers like Osborne, Kaypro 
and Zenith to run on MS-DOS and PC-DOS machines! 


L 
REDE 
+ East eS 





3. ACCELERATE8/16™ is also new and 
dramatically improves the performance 
age of Media Master Plus by tailoring the 
warreromorce crime | | CP/M emulation around a NEC V20 

——— microchip. This user installable plug-in 
chip simply replaces the 8088 processor 
in your MS-DOS computer. Once 
installed, itll run your CP/M and 
— MS-DOS software much faster. (Speed 
iciepramenibots are roughly 15% faster in MS-DOS and 
350% faster in CP/M!) Accelerate8/16 includes Media Master 
Plus, V20 CP/M Emulation Software, and the NEC chip 
for only $99.95! 

All three solutions save you money by eliminating 
expensive modems and communications software! 


TO ORDER 
To order Media Master, Media Master Plus, 


or Accelerate8/16, call 800-628-2828, ext. 629. 


For additional product and upgrade information contact: 


ACCELERATE8/16 


L ice WeccuiNnc 

i. L comers ug 
_ 4573 Heatherglen Court 

Moorpark, CA 93021 — 

or call 805-529-5073. RRR 





Dealer inquiries invited. * $99.95 for Dec Rainbow 
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Instant-C: 
The Fastest 
Interpreter for C 


Runs your programs 50 
to 500 times faster than 
any other C language 
interpreter. 


ny C interpreter can save you compile 
and link time when developing your 
programs. But only Instant-C saves 
your time by running your program at 
compiled-code speed. 


Fastest Development. A program 
that runs in one second when compiled 
with an optimizing compiler runs in 
two or three seconds with Instant-C. 
Other interpreters will run the same 
program in two minutes. Or even ten 
minutes. Don’t trade slow compiling 
and linking for slow testing and debug- 
ging. Only Instant-C will let you edit, 
lest, and debug at the fastest possible 
speeds. 


Fastest Testing. Instant-C immedi- 
ately executes any C expression, state- 
ment, or function call, and display the 
results. Learn C, or test your programs 
faster than ever before. 


Fastest Debugging. Instant-C gives 
you the best source-level debugger for 
C. Single-step by source statement, or 
set any number of conditional break- 
points throughout your program. Errors 
always show the source statements 
involved. Once you find the problem, 
test the correction in seconds. 


Fastest Programming. Instant-C 
can directly generate executable files, 
supports full K & R standard C, comes 
with complete library source, and works 
under PC-DOS, MS-DOS, or CP/M-86. 
Instant-C gives you working, well- 
tested programs faster than any other 
programming tool. Satisfaction guar- 
anteed, or your money back in first 

31 days. Instant-C is $495. 


Rational 


Systems, Inc. 
PO. Box 480 
Natick, MA 01760 
(617) 653-6194 
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| 16-BIT 


Listing One (Text begins on page 106.) 


comment 


code 


DOS_entry 


upper left 
left 

upper 
lower right 
right 

lower 

old int 


comment 


interrupt 


bios: 


comment 


name window 
page 7132 
title BIOS Window Extension V1.1 


\ 
Copyright 1984 John J. Seal 


The Graphic Software Company 
348 East Pratt Street 
Franklin, IN 46131 


This program may be used for any non-commercial purpose 
provided that this copyright notice is included. 
Commercial use is forbidden without the express written 
consent of The Graphic Software Company. 


This program allows a window to be defined on the display. 
All programs which use the BIOS Write TTY call for output 
will work within the window. Other BIOS calls may still be 
used for I/O to arbitrary screen positions. 


The window is defined by a pair of coordinates specified on 
the command line. The only absolute format requirements are 
that each coordinate pair start with a left parenthesis and 
be separated with a comma. Everything else is optional. The 
Suggested command format is: 


window (ur,lc) to (lr,rc) 


ur = upper row 
le = left column 
lr = lower row 
re = right column 


The new functions serviced by the video interrupt (int 10) 
and their corresponding function codés are: 


ah = 14 Write TTY 

ah = 16 Set window coordinates 

ah = 17 Get window coordinates 

ah = 18 Get blanking attribute 

\ 

segment 

org..* .100h 7For COM conversion 


assume cs:code 


label far ;DOS entry point 

jmp install 

label word ;Window coordinates 
db 0 

db 0 

label word 

db 79 

db 24 

dd ? 7Old interrupt vector 
\ 


The new interrupt procedure first filters out the new 
services from the old, and passes all old service calls 
back to the BIOS. 


\ 

proc far 

sti 

cmp ah,14 ;Write TTY 
je write tty 

cnp ah,16 ;Set window 
je set_window 

cmp ah,17 7;Get window 
je get window 

cmp ah,18 7;Get blanking 
je get_blanking 

jmp old int 

\ 


Set window coordinates. 


This function call sets the coordinates of a window in the 
display area. The window is defined by specifying the upper 
left and lower right corners in terms of screen coordinates. 
The upper left corner of the screen is position (0,0). The 
specified corners are included in the window area. 


If the specified coordinates are legal then the window is 
cleared, the cursor is homed to the upper left corner, and 
al = 0. Otherwise, no action is taken and al = 1, 
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set_window: 


exit: 


comment 


get_window: 


comment 


get_blanking: 


alpha: 


graphics: 


comment 


write tty: 


ah = 16 (function code) 

cx = upper left corner 

dx = lower right corner 
Exit: al = fail flag (see above) 


Entry: 


All registers preserved except ax. 


\ 

push bx ;Save registers 
push cx 

push dx 

mov al,l 

cmp ch,dh 7Check coordinates 
ja exit 

cmp cl, dl 

ja exit 

mov upper left,cx ;Update coordinates 
mov lower right, dx 

mov ah,18 ;Read blank attribute 
int 10h 

mov ax, 600h 7Blank entire window 
int 10h 

mov ah,15 7Read current page 
int 10h 

mov dx, Cx ;Home cursor 

mov ah, 2 

int 10h 

mov al,0O 

pop dx 7Restore registers 
pop Cx 

pop bx 

iret 

\ 


Get window coordinates. 


This function call returns the coordinates of the upper left 
and lower right corners of the current display window. 


Entry: 
Exit: 


ah = 17 (function code) 
cx = upper left corner 
dx = lower right corner 


All registers preserved except cx and dx. 


\ 

mov cx, upper left 7Read coordinates 
mov dx, lower right 

iret 

\ 


Get blanking attribute. 


This function call returns the attribute of the character 
at the current cursor position, if in alpha mode, or the 
background color (0) if in graphics mode. The resulting 
attribute is meant to be used when scrolling the screen. 


Entry: 
Exit: 


ah = 18 (function code) 
bh = blanking attribute 


All registers preserved except bx. 


\ 

push ax 7Save registers 

mov ah,15 7Read current page 
int 10h 

xor ah,ah 7Background color 
cmp al,3 *Check for alpha modes 
jbe alpha 

cmp al,6 7Check for graphics 
jbe graphics 

mov ah,8 7Read attribute 

int 10h 

mov bh, ah ;Return attribute 
pop ax 

iret 

\ 

Write TTY. 


This function call replaces the old call of the same name. 
It performs the same functions but allows the current window 
to be user defined instead of the whole screen. 


Entry: ah = 14 (function code) 
al = character to write 
bh = page number to write on 
bl = foreground color (in graphics modes) 


All registers preserved. 


\ 
cmp al,7 7Let BIOS ring the bell 
je bios 


(continued on next page) 
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Data Processing 


SOFTWARE 
SUPPORT 
TECHNICIAN 


Moving with Purpose 









In the competitive 
microcomputer marketplace, 
ASHTON-TATE has learned 
that excellence is the result 
of superior product and 
people performance. We’re 
moving ahead with an un- 
matched combination of so- 
phisticated software and 
qualified personnel. You can 
join our aggressive team of 
professionals in our Los 
Angeles operation as a 
Software Support Technician. 

















Requirements include an 
indepth working knowledge 
of our dBASE II® software 
package along with possess- 
ing the problem solving skills 
necessary to go on-line 
(telephone) to interface with 
ASHTON-TATE developers, 
dealers and end-users. Verbal 
and written communication 
skills are important, as is: 
your proven ability to write 
and debug dBASE II® pro- 
grams. Some familiarity with 
MS-DOS and CP/M is also 
required. 
















In return for your expertise 
and personal initiative, you 
can expect first class re- 
sources, generous benefits 
that include relocation 
expenses and a company you 
can grow with—not out of. 
So, tell us about yourself, 
Send your resume with Salary 
history, in confidence to: 
Tony Faison, ASHTON- 
TATE, 20101 Hamilton, 
Torrance, CA 90502. 
Principals Only Please. Equal 
Opportunity Employer. 
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Users’ 
Group 


Over 85 volumes of public 
domain software including: 


compilers 
editors 
text formatters 
communications 
packages 
e many UNIX-like tools 


Write or call for more details 


The C Users’ Group 
Post Office Box 97 
McPherson, KS 67460 
(316) 241-1065 
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Tree Shell 


A Graphic 
Visual Shell for 
Unix/Xenix 

End-Users and 
Experts Alike! is 











































Dealer 
inquiries 
welcomed. 


i 


Cole 


“A Higher Form of Software” 
24000 Telegraph Road 
Southfield, MI 48034 
(313) 352-2345 
TELEX: 386581 COGITATE USA 
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COMING SOON!! 
— VOLUME IT — 


PROGRAMMERS’ HANDBOOK OF 
COMPUTER PRINTER COMMANDS -Vol. II 
FOR MODELS AS NEW AS 1985 


Approximate Shipping Date - May 15, 1986 


This book contains codes for desktop printers not 
included in Volume |. Volume II has the same easy 
to use table-format. Codes are listed in text form 
with hex and decimal equivalents and function 
description. Volume || has almost 200 pages, 52" x 
8%" spiral bound, with manufacturers listed alpha- 
betically. This is an essential reference that will 
save the programmer time, time, and more time. 
1. Volume | (models through 1984) ............ $37.95 
2. Volume II (models as new as 1985) .......... $26.95 
3: 2 DOGK cevVOlS. 1 GEN) sce Sedeisi. soa eds $58.95 


(Indiana residents add 5% sales tax. 
Piease include $2.50 shpg/hdig) 


TO ORDER CALL: 
1-800-628-2828 ext. 534 


Quantity Orders or Dealers may call the below num- 
ber collect. For detailed information, call or write: 


=> Gardingl » Pigint .: 


INC OR P OR 4OEE SD 


P.O. Box 596, Ellettsville, IN 47429 
(812) 876-7811 (M-F, 9-5 EST) 
We accept MC, VISA, MO-same day shpg. aaVISA 
* COD-$2 extra. CK’s-Allow extra 14 days. 
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=e 


, 
crs 
; 


set_cursor: 


=e 


bs: 


interrupt 


greeting 


error _msg 


comment 


install 





16-BIT 


(Listing continued, text begins on page 106.) 


push ax ;Save registers 

push bx 

push Cx 

push dx 

push ax ;Save character 

mov ah, 3 ;Read cursor position 
int 10h 

pop ax ;Recover character 


Check for unprintable control characters 


cmp al,8 ; Backspace 

je bs 

cmp al,10 ;Line feed 

je lf 

cmp al,13 ;Carriage return 
je cr 


Character is printable 


mov C452 ;Print character 
mov ah, 10 

int 10h 

inc dl ;Advance cursor 
cmp dl, right 

jbe set cursor 


Right edge of window exceeded - wrap to next line 


mov dl, left 
inc dh 

dh, lower 
jbe set_cursor 


Lower edge of window exceeded - scroll window up 


push bx ;Save page 

mov ah, 18 sRead blank attribute 
int 10h 

Mov cx, upper left :Scroll window up 
mov dx, lower right 

mov ax, 601h 

int 10h 

pop bx ;Restore page 


Return cursor to left-hand edge 
mov dl, left ;Carriage return 


Set cursor to new position 


mov ah,2 :Set cursor 

int 10h a 
pop dx ;Restore registers 
pop Cx 

pop bx 

pop ax 

iret 


Backspace does not wrap past left edge of window 


dec dl ;Back up 

cmp dl, left ;Past left edge? 
4b ex 7Yes, reset cursor 
jmp set cursor. 7;No, leave it alone 
endp 

db 13,40 

db 218,30 dup (196),191,13,10 

db 179,' The Graphic Software Company ',179,13,10 

db 179,' BIOS Window Extension V1.1 ',179,13,10 

db 192,30 dup (196),217,13,10, ‘$' 

db 13,10, ‘Invalid window coordinates',13,10, '$S' 


rol 


The install procedure is invoked through the DOS entry point 
when the program is first run. It installs the new interrupt 
and prints a message on the console. When done, it returns to 
DOS and allows the space it occupies itself to be reclaimed. 


The program first tests whether the BIOS extensions are already 
installed. If they are not, this can be detected by the fact 
that a call to an illegal function will return without altering 
any registers. 

\ 


assume ds:code 


proc near 

mov ah,17 ;Read coordinates 
int 10h 

inc ei ;Alter their value 
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mov al,cl 
int 10h 
cmp al,cl 
pushf 
jne installed 
: Install BIOS extensions 
MOV dx,offset greeting 
Mov ah, 9 
int 21h 
MOV ax, 3510h 
int 21h 
mov word ptr old _int,bx 
mov word ptr old int+2,es 
mov dx,offset interrupt 
mov ax, 2510h 
int 21h 
: BIOS extensions are installed now 
installed: push cs 
pop es 
MoV di, 81h 
mov cx, 7fh 
Mov aes * (* 
repne  scasb 
call num pair 
push dx 


repne scasb 
call num_pair 


pop Cx 
mov ah, 16 
int 10h 
or al,al 
jz legal 
; Window coordinates are illegal 
mov dx,offset error msg 
Mov ah, 9 
int 21h 
: Terminate program in appropriate manner 
legal: popf 
jne resident 
mov dx,offset greeting 
int— 27h 
resident: int 20h 
num_pair proc near 
push Dx 


call number 
mov bh, dl 
call number 


mov dh, bh 
pop bx 
ret 

num pair endp 

number proc near 
push ax 
push bx 
mov ai," * 
repe scasb 
dec di 
mov bl, 10 
xor aX, ax 
xor ax, dx 

digit: xchg ax, dx 
mul bl 
add ax, dx 
xchg ax, dx 
Mov al,es: [di] 
inc di 
sub ai, “6* 
cmp ai; *S* 
jbe digit 
pop bx 
pop ax 
ret 

number endp 

install endp 

code ends 
end DOS_entry 
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;Read them again 
7Test for difference 


;Report installation 


;Read old interrupt 
;Save old interrupt 


zInstall new interrupt 


7;Point to command tail 


;Read coordinates 


7Find first pair 
7Find second pair 


7;Set coordinates 


7Test legality 


;Print error message 


;Check residency 


;Make resident 
;Already resident 
s;Read first number 
;Read second number 


7Row/Col pair in dx 


;Skip leading blanks 
;Decimal multiplier 


sMultiply by 10 
;Add new digit 
;Read next character 


;Normalize it 
7Check for digits 


:Number in dx 


;Must be far label 


End Listing 


as 


PEON 


C+ 
oR 


TRANSFER DATA BETWEEN OVER 
500 DIFFERENT COMPUTER SYSTEMS 
WORD PROCESSORS TOO 
QUICK TURN-AROUND 
PRICES FROM $9 PER DISK 


CALL OR WRITE FOR YOUR 
FREE CATALOG 
PORT-A-SOFT 
555 S. STATE ST., SUITE #12 
P.O. BOX 1685, OREM, UT 84057 

801) 226-6704 
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Software Tools 


MICRO C-Shell $49.95 
Unix style C shell with aliases 


I/O Redirection, & batch files. 


MICRO C Tools $24.95 


Unix style software tools for 
text editing and debugging. 


MICRO Make $34.95 


Automatically builds programs. 
Creates batch files or executes 
compiler/linker etc. directly. 


Atari ST and IBM PC Versions 
(415)658-5318 


Beckemeyer Development Tools 
592 Jean St. #304 
Oakland, CA 94610 


MC & VISA Accepted 
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PROMPT DELIVERY!!! 


SAME DAY SHIPPING (USUALLY) 


OUTSIDE OKLAHOMA: NO SALES TAX 


DYNAMIC RAM 
256K 64Kx4 150ns_ $4.75 
256K 256Kx1 100ns 5.95 
256K 256Kx1 120ns 3.45 
256K 256Kx1 150ns 2.87 
128K 128Kx1 150ns 4.92 
64K 64Kx1 150ns 1.52 
EPROM 
27512 64kKx8 250ns $32.00 
27C256 32kx8 250ns 7.72 
27256 32kx8 250ns 4.98 


dem 





$71.66 


$185.00 
135.00 


27128 16Kx8 250ns JiaU 

27C64 8kKx8 250ns 5.30 

2764 8Kx8 250ns 3.10 

2732 4kKx8 450ns 3.85 
STATIC RAM 


6264LP-15 skx8 150ns___ $3.25 
QUANTITY ONE PRICES SHOWN 


8087-2 Math Coprocessor 
8087-3 Math Coprocessor 


640 Kbyte MOTHERBOARD KITS: Zenith 150: $76.66 
IBM PC/XT, Compaq Portable & Plus: 


OPEN6'%DAYS: WECAN SHIP VIA FED-EX ON SAT. 
MasterCard/VISA or UPS CASH COD 
Factory New, Prime Parts Poo 
MICROPROCESSOR UNLIMITED, INC. 


24,000 S. Peoria Ave., (918) 267-4961 


Prices shown above are for March 24, 1986 


: Orders received by 6 PM be delivered 
Ft Eronas Sunland Ale @ $8.00, of Priority One @ $13.00! 
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COLUMNS 


MS DOS Reference Books 
Ithough books on 8086/88 as- 
sembly-language programming 

abound, books on programming in 
the MS DOS environment have been 
nearly nonexistent. Several new 
books on this subject have appeared 
recently, however, and I would like 
to mention a few I have looked at: 


Simrin, Steven. MS-DOS Bible. India- 
napolis: Howard W. Sams & Co., 1985. 
385 pages with index. 

I would characterize this as an in- 
troductory systems guide to MS DOS. 
Exposition of the MS DOs hierarchical 
file structure, I/O redirection and 
pipes, installation of a fixed disk, 
batch files, the MS DOS intrinsic and 
extrinsic Commands, and use of ED- 
LIN, LINK, and DEBUG comprise the 
majority of the book: Two brief 
chapters discuss disk formats, direc- 
tories, the file allocation table, and 
device drivers; the actual MS DOS 
function calls are relegated to an ap- 
pendix. The book contains virtually 
no programming examples. 


Jump, Dennis N. Programmer’s Guide 
to MS-DOS. Bowie, MD: Brady Com- 
munications Co., 1984. 244 pages 
with index. 

Although this book carries a 1984 
copyright date, I did not see it in the 
bookstores until a few months ago. It 
is aimed at beginning assembly-lan- 
guage programmers and discusses 
the various MS DOs function calls by 
category (traditional character I/O 
calls, traditional file management 
calls, extended file management 
calls, and so on). There is minimal 
coverage of MS DOS loading, struc- 
ture, or disk control areas. The expla- 





by Ray Duncan 





nations of memory management, the 
MS DOS EXEC call, and installable de- 
vice drivers are reasonable though 
incomplete. The last 30 or so pages of 
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the book are devoted to IBM PC-spe- 
cific topics, mainly the ROM BIOS 
driver calls. Programming examples 
are chiefly in the form of assembly- 
language functions to be called from 
Pascal, except for an example char- 
acter device driver. This book, to- 
gether with the MS-DOS Bible by Sim- 
rin would be a good starting point for 
beginning MS DOS assembly-language 
programmers as the two books have 
little overlap in content. 


King, Richard A. The MS-DOS Hand- 
book. Berkeley, CA: Sybex. Computer 
Books, 1985. 319 pages with index. 

This book is written for beginning 
assembly-language programmers; it 
covers most of the same material as 
the previous two books combined ex- 
cept that disk structures and control 
areas are discussed in a rather gener- 
al way and device drivers are barely 
mentioned. It contains few program- 
ming examples. My biggest com- 
plaint about this book is that material 
applicable to generic MS DOS systems 
and material pertinent only to IBM 
PCs is jumbled together with very lit- 
tle distinction. 


Norton, Peter. The Peter Norton Pro- 
grammer’s Guide to the IBM PC. Belle- 
vue, WA: Microsoft Press, 1985. 426 
pages with index. 

As you would expect, this book is 
heavily slanted toward the IBM PC 


| family with extensive discussion of 


the IBM video adapter, keyboard, 
sound generation, and ROM BIOS. It 
may best be viewed as a well-orga- 
nized, highly readable replacement 
for both the IBM PC DOS Technical Ref.- 
erence and the IBM PC Hardware Refer- 


16-BIT SOFTWARE TOOLBOX 


ence manuals. It’s directed at program- 
mers of intermediate experience. 
Information on the generic MS DOS 
services occupies less than a quarter 
of Norton’s book but is still relatively 
thorough; additional quick-refer- 
ence tables. are well laid out. The 
book has clear explanations of the MS 
DOS disk structure and control areas, 
file control blocks, and program seg- 
ment prefixes. The section on the 
EXEC function is inadequate to make 
it work (unless the reader already 
knows how) because the special use 
of the modify memory block func- 
tion 4ah with register ES pointing to 
the calling program's PSP is not de- 
tailed; also, the author’s comment on 
registers destroyed by EXEC and the 
method of saving and restoring the 
SS and SP registers are not correct. 
Coverage of device drivers is limited 
to some discussion and (deserved) 
criticism of ANSI.SYS; there is no mate- 
rial on the structure or programming 
of device drivers. Assembly-language 
examples are sparse and simplistic 
and are nearly all from the point of 
view of Pascal or C subroutines. 


Lafore, Robert. Assembly Language 
Primer for the IBM PC and xT. New 
York: New American Library, 1984. 
501 pages with index. | 
Like the Norton book, this book is 
strongly biased toward the IBM PC 
hardware and ROM BIOS software, 
but about a quarter of it is devoted to 
discussion of general MS DOS topics. 
The layout of DOS and the structure 
of executable program files are dis- 
cussed briefly. File I/O is well cov- 
ered, but advanced subjects such as 
device drivers, memory allocation, 
and the EXEC call are completely ab- 
sent. This book makes extensive use 
of hex memory dumps and assem- 
bly-language examples, including 
complete working programs—a 
style that should be commended. 


MS-DOS Programmer's Reference. 


Dr. Dobb’s Journal, May 1986 


Bellevue, WA: Microsoft Press, 1984. 
This book is rarely seen in its origi- 
nal Microsoft form. It is, however, 
commonly available in various MS 
DOS OEM editions, the most prevalent 
(of course) being the IBM PC DOS Tech- 
nical Reference. Versions are also ex- 
tant from Hewlett-Packard, Zenith, 
and Intel, among others. The Intel 
book is the best of the bunch; it has 
been extended with assembly-lan- 
guage examples for each MS DOS sys- 
tem function, source code for simple 
block and character device drivers, 
and a lengthy appendix describing 
the Intel relocatable object record 
format. It can be ordered from the 
Literature Department, Intel Corp., 
3065 Bowers Ave., Santa Clara, CA 
95051 (part number 135555-001). 


DDJ readers are invited to send fur- 
ther comments on the above books to 
this column and to provide informa- 
tion on other books they have found 
useful. Two additional books on Ms 
DOS programming, aimed at interme- 
diate to advanced assembly-language 
programmers, are due from Micro- 
soft Press about the time this column 
will appear in print. The first is my 
own book Advanced MS-DOS. The 
other is the MS-DOS Technical Refer- 
ence Encyclopedia, Volume I (collabo- 
ration of several authors, preface by 
Bill Gates, about 1200 pages, $134.95, 
June publication date expected). 


The EXEC Function and 
FORTRAN 

Chris Dunford, author of the popular 
CED command line editor, sent a com- 
ment on the interface between FOR- 
TRAN and the EXEC call that was 
printed in the January 1986 16-Bit 
Toolbox: “I wonder if you’re aware 
that there is an easier way to find the 
PSP of a program: DOS function 62h re- 
turns (in register bx) the PSP address 
of the currently executing process. 
Function 62h is not available under 
DOS 2.x, but undocumented function 
51h performs the same service. You 
want to avoid using undocumented 
features, of course, but I don’t fore- 
see new releases of DOS 2.X in the 
near future! 

“It seems to me quite safe to check 
the DOS version under which your 
program is running, then use func- 
tion 51h or 62h as appropriate. Of 
course, another advantage of this 


Dr. Dobb’s Journal, May 1986 


method over Sybek’s is that it’s com- 


piler independent.” 


The 20 Files Problem 

Dan Daetwyler’s description of his 
problem with Dos’ limit of 20 open 
files per process, which appeared in 
the December 1985 16-Bit Toolbox 
column, provoked several helpful re- 
sponses from DDJ readers. 

Sean McDowell of Marietta, Geor- 
gia, said: “I am writing in response to 
Mr. Daetwyler’s letter about DOS 3.0 
and the 20 file handle limit. We have 


C-terp 


The C 
Interpreter 


You Won't 
Outgrow 


C-terp will grow with you as you progress 
from novice through professional to guru. 
Unbelievable, but true, the easiest-to-use 
C interpreter will provide you with the 
most advanced programming features for 
upward growth. Our exclusive object 
module support enables you to add 
libraries (like HALO, PANEL, Windows for 
C, etc., or your own homebrew libraries) 

to C-terp as you add them to your comput- 
ing repertoire. Use C-terp as a microscope 
on your libraries! Flip a bit and allow our 
software paging (NEW) to handle those 
big jobs! There are no fixed-size tables 

to overflow, and C-terp can be configured 
for different screens and screen adapters 
(NEW). With multiple modules and full 
K&R support, we offer a dream C environ- 
ment. 


@ Our new improved configurable editor 
competes with anything going. 


@ Speed -- Linking and semi-compilation 
are breathtakingly fast. 


@ Convenience -- Errors direct you back 
to the editor with the cursor set to the 
trouble spot. 


@ Symbolic Debugging -- Set breakpoints, 
single-step, and directly execute C ex- 
pressions. 


@ Compatibility guaranteed — batch file to 
link in your compiler’s entire library. 
Supported compilers include: 
Computer Innovations C86, Lattice C, 
Microsoft C 3.0, Mark Williams C86, and 
Aztec C. 


@ Many more features including batch 
mode and 8087 support. 





had this problem since handles were 
first introduced. I am very curious 
about why Mr. Daetwyler didn’t run 
into this problem sooner. The prob- 
lem seems to stem from the amount 
of room available in the program seg- 
ment prefix (PSP). If you look at the 
memory map of the PSP in the JBM 
Technical Reference, there is an area 
from offset 18h to 2bh marked as re- 
served. This appears to be where DOS 
stores the allocated file handle num- 
bers. Because there are 20 bytes, 
there are 20 file handles for the cur- 





What Our Users/ 
Reviewers Are Saying 


.. €asy to use, powerful, anda 
timesaver.” 


-. we absolutely LOVE C-terp.” 


.. has restored my faith in 
interpreters.” 


...a programmer's dream,” 
.. Wonderful technical assistance.” 


.. increased our productivity bya 
factor of 40.” 


.. the best C product ever, in any 
category.” 


Price: $300.00 (Demo $45.00) 
VISA 


, 


Prices include documentation and shipping 
within U.S. PA residents add 6% sales tax. 
Specify compiler. 


@ C-terp runs on the IBM PC (or any BIOS 
compatible machine) under DOS 2.x 
and up with a suggested minimum of 
256 Kb of memory. It can use all the 
memory available. 


* C-terp is a trademark of Gimpel Software. 


GIMPEL SOFTWARE 


3207 Hogarth Lane © Collegeville, PA 19426 
(215) 584-4261 
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Try It. 
Then Buy It. 
PC-Write.: 


A fast, full-featured word 
processing package for the 
unbelievable price of $10. 
Complete. You get a manual 
on disk, mail merge, split 
screen, keyboard macros, 
on-screen formatting, full 
printer support, and more. 






Try PC-Write for $10. 
Then register for $75 to get: 

e latest diskette 

¢ printed manual 

° two updates 

e phone support 

e newsletter 
Registration supports our 
shareware’ concept that 
keeps our prices low, and 
allows our development of 
PC-Write enhancements. 


















Shareware means you can 
get PC-Write from a friend 
or user group to try, and 

give away copies yourself. 
Then register if you like it. 
No risk! 


Dr Dobb’s 
Journal 
May 1986 
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Version 2.6 
Automatic reformatting with 
proportional spacing, menus, 
bracket match, more macro 
keys, HP LaserJet+ support, 
and a wonderful new manual. 









Order PC-Write Today. 


Satisfaction Guaranteed. 


ee eae +m 
(206) 282-0452 


ee 219 First N. #2247 
wey” Seattle, WA 98109 
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rent process. DOS seems to use the 
segment address of the current PSP 
(see DOS 3.0 function 62h) as the pro- 
cess ID. Because an interrupt to a resi- 
dent database-handling module 
would not change this value, that 
would explain why splitting the da- 
tabase and allowing the resident task 
to own part would not correct the 
problem. ... Currently we are open- 
ing and closing handles with a least- 
recently-used algorithm within our 
file access routines, even though that 
can be painfully slow at times.” 
Inspecting the PSPs of some of my 
own programs, it does seem evident 
that the PSP handle table positions 
correspond to handle numbers. The 
byte at a given table position contains 
OFFH if the handle is not in use for 
the process. If the handle is opened 
to a file or device, the byte contains a 
small integer number that is proba- 
bly an index to DOS’ internal table of 
file control blocks for the ‘““extended”’ 
file functions. 
Ross Nelson of San Jose, California, 
took this a little further: “The DOS 
equivalent of the process ID is the PSP 
paragraph number. This is how DOS 
keeps track of who owns memory 
blocks, and I suspect it manages open 
files in this way as well. It keeps an 
internal variable to track the ‘cur- 
rently active PSP,’ and there are two 
(undocumented naturally) calls to 
get/set this variable. 
“Executing an interrupt 21h with 
ah=51h will return the currently ac- 
tive PSP in the bx register. Loading bx 
with a PSP and executing an interrupt 
21h with ah=50h will set a new ac- 
tive PSP. The pseudotasking solution 
to the file problem is then handled in 
this way: 


Task A: open initial files, do process- 
ing, EXEC Task B 

Task B: open new files, call (via soft- 
ware interrupt?) to Task A 

Task A: save active PSP, set active to 
Task A’s PSP, do processing, re- 
store previous PSP, return 

Task B: continue processing. . .”’ 


An unsigned note from another 
reader, along with a labeled hexa- 
decimal dump of a program segment 
prefix, also took Mr. McDowell's ob- 









servation on the PSP a little further. 
The anonymous reader pointed out 
that the words at PSP +0032h, 0034h, 
and 0036h contain the maximum 
number of handles allowed for the 
process, the offset of the handle ta- 
ble, and the segment of the handle 
table, respectively. The note said: 
“To open more than 20 handles, pro- 
vide an area in your program consist- 
ing of one byte per handle. Move the 
first five handles from the table at 
PSP +0018h to the new handle table. 
Then, change the handle table point- 
ers at PSP +0034h to point to the new 
table, and change the value at 
PSP +0032h to the number of entries 
in the new table.” 


PC/AT Interrupts 

Brett Salter of Data Base Decisions 
wrote: “In regard to the AT problem 
you mentioned in your May 1985 col- 
umn, I’m afraid Intel’s nasty habit of 
referring to interrupt numbers as 
decimal instead of hex has caused 
some confusion. Interrupt 13 decimal 
(not hex) is the segment overrun ex- 
ception interrupt. Because this inter- 
rupt (0dh) was not previously used, it 
won’t cause anything as disastrous as 
zapping a hard disk. 

‘TBM has most of the new excep- 
tion interrupts vectored to a routine 
that sets a flag and then IRETs back to 
the user’s program. On return, the 
instruction that caused the exception 
is reexecuted, putting the system into 
an enabled loop. The only way out 
on a normal PC/AT is to use Ctrl-Alt- 
Del to reboot. 

“If you have my Periscope debug- 
ger installed on an AT, interrupts 0dh 
(segment overrun) and 06h (invalid 
opcode) point to Periscope. This 
means that the instruction sequence 
shown in your column will put the 
user into Periscope, where you can 
modify the registers as needed to re- 
cover the system. 

“Another new twist on the PC/ 
AT—if your program uses the array 
BOUND instruction, an exception 
causes INT 5 to be performed, print- 
ing the screen to a parallel printer. 
Then control returns to the BOUND 
instruction that caused the interrupt, 
which prints the screen over and 
over until you reboot the system. 
Once again, Periscope can be set to 
intercept this interrupt, letting you 
regain control of the system.”’ 
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Macro Assembler, 

Version 4.0 

The new speedy Version 4.0 of the 
Microsoft Macro Assembler also has 
a completely new bug! It seems that 
the include function has been 
changed in such a way that it ignores 
end-of-file marks (Jah) and uses the 
size of the file as recorded in the disk 
directory instead. If you use an editor 
(such as WordStar in nondocument 
mode), which rounds the size of the 
file up to the next block boundary 
and pads the last block out with EOF 
marks, you will get an “extra charac- 
ters on line’ error for the include 
statement. The listing file cannot be 
typed or printed past the point of the 
error because the macro assembler 
copies all of the extra EOF marks into 
the listing file! A work-around sug- 
gested by Microsoft is to invoke ED- 
LIN with the name of the source file, 
then enter the E command to imme- 
diately exit from the line editor. ED- 
LIN will scan for the first EOF mark 
and create a new file with the cor- 
rect size, renaming the original file 
with a BAK extension. 


IBM PC Window Control 

John J. Seal, of the Graphics Software 
Co., contributed a resident window 
manager for the IBM PC to this 
month's 16-Bit column (see Listing 
One, page 102). The program is in- 
voked with a command in the form: 


C> WINDOW (B,C) TO (R,C) 


which specifies a window on the 
screen in which all subsequent activ- 
ity will take place. The window coor- 
dinates are given as the upper-left 
and lower-right row and column. Co- 
ordinate (0,0) is the upper-left corner 
of the screen. 

WINDOW makes itself resident and 
captures the IBM BIOS video driver in- 
terrupt, filtering out some calls and 
passing the others on to the ROM 
driver. The areas outside the current 
window may be written to directly 
by any of the usual commands (in 
your favorite language) that allow di- 
rect coordinate specification; the 
WINDOW program affects only char- 
acters that are displayed with the 
“TTY Output” ROM BIOS call (function 
0eh). The WINDOW program illus- 
trates several useful PC DOS program- 
ming techniques: 
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e installation of a new resident pro- 
cess with the terminate and stay resi- 
dent function 

¢ chaining on to an existing interrupt 
handler 

¢ using the MS DOS get interrupt and 
set interrupt functions to inspect and 
modify the hardware interrupt table 


Although I have not changed Mr. 
Seal’s code, it should be noted that 
the preferred method to terminate 
and stay resident for DOS, Version 2 
and later, is use of interrupt 21h func- 


tion 31h, rather than interrupt 27h. Si- 
milarly, the preferred method of fi- 
nal exit is now interrupt 21h function 
4ch, rather than interrupt 20h. 


DDJ 


(Listing begins on page 102.) 
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RPG COMPILER FOR IBM PC 

The new Lattice RPG II compiler is 
ideally suited for creating commercial 
applications for MS-DOS. Allow your 
current RPG II programmers to be 
productive on MS-DOS. 

The Lattice RPG II compiler is compat- 
ible with System III, Systen/34 and /36 
RPG II compilers, it uses ASCII files and 
MS-DOS command language, plus has 
ISAM compatibility with dBASE III. 
$750.00 and no run time fees. 





VERSION 3 OF THE LATTICE 
MS-DOS C COMPILER IS NOW 
AVAILABLE. 

This is a major upgrade of 
the product and is available to 
registered users for a $45 update 
fee. Non-registered $60. The list 
price remains $500. 


New compiler features include: 

* ANSI language constructs... 
“unsigned” as a modifier 
“void” data type 
“enum” data type 
structure assignments, arguments, 
and returns 
argument type checking 

* Inline code 8087/80287 

80186/80286 

* Code generation 
The compiler also contains 

numerous improvements such as 


sO 
“Ee 


Lattice 

(312) 858-7950 TWX 910-291-2190 
INTERNATIONAL SALES OFFICES; 
Benelux: De Vooght. (32)-2-720-91-28. 
Japan: Lifeboat Inc. (03) 293-4711 
England: Roundhill. (0672) 54675 

France: SFL (1) 46-66-11-55 

Germany: (49) 7841/4500 (49) 8946/4613-290 





Works 


better aliasing algorithms, more 
efficient code generation, and more 
flexible segmentation. The library 
includes more than 200 new 
functions in the following 
categories: 
* ANSI/UNIX/XENIX compatibility 
* Extended support for MS-DOS 
* Extended support for networking, 
including file sharing, file locking, 
and I/O redirection 
* Flexible error handling via user 
traps and exits 
The Library has also been 
re-engineered to produce much 
smaller executables. 


LATTICE ANNOUNCES NEW DATA 
ENCRYPTION SOFTWARE 

Now you can keep your 
confidential data confidential. 
Thanks to new SecretDisk, a new 
data encryption system for IBM PC, 
XT, AT and compatibles. 

Utilizing the NBS Data Encryption 
Standard, SecretDisk provides 
complete security for salaries, 
customer lists, or other sensitive 
information stored on a floppy or 
hard disk. SecretDisk is loaded as a 
disk driver by MS-DOS. It creates 
new DOS drives (like D:) on floppy 
or hard disks where all data and 
programs are always fully 
encrypted. 

SecretDisk is extremely easy to 
use. A password is entered when the 
system is booted, and protection can 
be switched on and off with a single 
password controlled command line. 
However, without the password, 
there is no way to access the 
encrypted files. $59.95. 

Contact Lattice, to discuss your 
programming needs. Lattice 
provides C compilers and cross 
compilers for many environments 
including Tandy, Sony, Hewlett- 
Packard, Tandem, and IBM 
Mainframe. Corporate license 
agreements available. 
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COLUMNS 


THE RIGHT TO ASSEMBLE 


Code Compression with Mini-Interpreters 


Cc ode crunching is an arcane art, 
something like squeezing ele- 
phants into phone booths. When I 
was a game designer at Atari, I con- 
stantly had to squeeze my 6502 code 
down further and further to fit into a 
pitifully small 4K ROM space. Even af- 
ter Atari invented a bank-switching 
ROM cartridge, we still came up 
against the memory limit very quick- 
ly. One of our sayings was that it’s 
always possible to squeeze another 
byte out of an assembly-language 
program. Some of the feats we ac- 
complished were truly remark- 
able—the world’s smallest chess pro- 
gram (as far as I know) runs on the 
2600 VCS game machine with only 4K 
of ROM and 128 bytes of RAM! When I 
left Atari, I thought I would never 
have to worry about crunching my 
code again. I was entering the world 
of ‘‘big’’ machines, with huge 64K 
RAM spaces! That was at best a very 
temporary release, though. Soon I 
was dealing with truly ‘enormous’ 
programs (operating systems), and 
once again I had to start crunching 
my code. 

Some of the techniques for effec- 
tive code crunching are actually 
quite simple—for example, variables 
can frequently be moved into low 
memory, where most processors can 
access them with fewer bytes of ad- 
dress information. On the 6502 this is 
a particularly large saving—an in- 
struction that loads a byte from 
memory location $1000 requires 3 
bytes, but if you load the information 
from $10 you use up only 2. Another 


by Nick Turner 


trick is to use register variables wher- 
ever possible because register in- 
structions are usually shorter. On the 
first crunching pass, though, all these 
simple tricks are usually used up. At 
Atari, this first pass usually reduced 
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the size of the game program by no 
more than 15 percent. Because the 
“raw” programs were about twice as 
large as the space into which they 
had to be shoehorned, there was still 
a lot of crunching to be done. 


Using a Mini-Interpreter 

The technique I'll talk about here 
was used with some success in many 
of my operating system designs. It’s 
best applied when you have a lot of 
code that contains repetitive calls to 
several different subroutines. In one 
particular case, I was writing a sys- 
tem that would be accessed over the 
phone by users with serial terminals. 
It was important to be able to trans- 
mit various sequences of control 
characters and also to be able to re- 
ceive and interpret similar se- 
quences, setting and clearing various 
flags and changing the modes of in- 
put and output. To do this with tradi- 
tional code would have worked, but I 
managed to chop the size of the re- 
quired code by more than half using 
what I call a mini-interpreter. 

A mini-interpreter is a subroutine 
that pops the stack to find out where 
it was called from, then reads the 
bytes immediately following the call- 
ing instruction and performs various 
tasks based on what is sees there. At 
some point it will see a return token 
and will perform a jump to the next 
valid instruction following. In the 
case of a machine in which the in- 
structions must be word-aligned, 
such as the 68000, it would return to 
the next even-addressed byte. 

The mini-interpreter I wrote for 
my dial-up system was originally 
created as a print routine that would 
read an ASCII string immediately af- 


ter the invoked instruction, then 
print it out. A null ($00) was used to 
terminate the string. (A 6502 routine 
by Chris Espinoza that does just this 
was published in the September 1976 
issue of DDJ.) Here’s a typical calling 
sequence for the routine as described 
so far: 


;code preceding the 


call 
JSR PRINT ;call the print 
routine 
ASC “This text would be printed 
out.” 
HEX 00 


;code following the 
call 


Note that the calling sequence re- 
quires 4 bytes; 3 for the JSR instruc- 
tion and 1 for the null-token termina- 
tor. I felt that this 4-byte overhead 
was excessive. How could I shave it 
down? 

The answer occurred to me one 
day while I was setting a breakpoint 
to debug a program: The BRK instruc- 
tion, which is used by debuggers to 
wrest control from the executing 
program when it reaches a $00 in the 
program, occupies only 1 byte and 
can cause execution to vector to any 
point in memory. The only problem 
was that the BRK instruction was 
used extensively during debugging. 
So, I created a conditional macro that 
would assemble the PRINT call as a 
JSRor a BRK, depending on whether I 
was debugging or not. Then I added a 
small routine in the initialization that 
placed the address of my PRINT rou- 
tine into the BRK vector. Of course, 
the PRINT routine itself also had to 
have some conditionally assembled 
code because the BRK instruction 
puts some status information on the 
stack that I needed to pop and ignore. 
Only a few extra instructions were 
needed, however. The new method 
worked beautifully. Now I could 
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print any text I wanted with only a 2- 
byte overhead. Of course, the routine 
that handled the PRINT calls took up 
some space of its own, but with doz- 
ens of calls in my code, the extra 
overhead was more than compensat- 
ed for by the code savings in my 
PRINT calls. 


Further Refinements 

I was quite pleased with the results, 
but I still needed to shave the pro- 
gram down further. I discovered that 
there were about a dozen macro ex- 
pansions that frequently occurred 
adjacent to the PRINT calls. Many of 
them were used to set, test, or clear 
various print format flags—for ex- 
ample, there was a protocol with 
which the user could send a Control- 
C to inhibit furthur output until the 
beginning of the next logical block of 
text. To implement this protocol, I 
created an output-inhibit flag and 
tested the status of the flag before 
sending each character. The flag was 
reset at the beginning of each block 
of text and set whenever a Control-C 
was detected from the user. The 
problem was that the flag reset often 
occurred in the middle of a stream of 
text, requiring a code sequence 
something like this: 


ts ;text being output 
ASC “The last text in the first 
block.” 
HEX 00 ‘marks end of text 
LDA TXTFLAG _ ;clear output sup- 
TXTFLAG press flag 


AND #255-OUTSUP 
STA TXTFLAG 


PRINT ‘macro that in 
vokes print inter- 
preter (JSR or BRK) 

BRK 

ASC ‘'First text in the next block.” 


;more text 


Look at all those bytes! Including the 
end token of the previous block, the 
code to clear the flag, and the BRK to 
call the interpreter again, I used up 8 
bytes! How could I cut that down? 
The answer became obvious as 
soon as I realized that the text-output 
interpreter could easily be increased 
in size without adding very much to 
the overall size of the program. Be- 
cause there were quite a few 8-bit 
values that could never be encoun- 
tered in the middle of a text stream, I 
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simply appropriated one, equated it 
to CLCTLC (CLear ConTroL C), and 
stuck it into the text stream. After 
adding the appropriate code to the 
interpreter, I reduced the above 
monstrosity to: 


as ‘text 
ASC “The last text in the first 
block.”’ 
BYTE  CLCTLC _ ;clear output 
suppression 
ASC ‘First text in the next block.” 
;more text 


This was the start of something big 
(or, rather, something small!). There 
were several other flags whose en- 
tire manipulation could be com- 
pressed in the same way. Eventually, 
I added a lot more to the routine. I 
added escape codes that would 
switch to a different interpreter alto- 
gether. I added a set of conditional 
test codes that allowed me to output 
one of two strings depending on the 
state of various flags. I even added a 
code that allowed me to call any ma- 
chine-language subroutine any- 
where and then return to interpret- 
ed execution upon encountering the 
RTS from the called routine (an inter- 
preted JSR instruction). This one was 
particularly useful because it al- 
lowed me to perform special-pur- 
pose routines without the code over- 
head of leaving the text output 
interpreter. 

I never ran into any difficulties 
with this heavily interpreted ap- 
proach, and I was able to reduce the 
code overhead vastly for ‘‘stupid lit- 
tle stuff” that I had to do repeatedly. 
If your application is time critical, 
you might not want to use a mini-in- 
terpreter. But because code size was 
far more important to me than the 
time required to execute the instruc- 
tions, this approach was perfect for 
my on-line system, which you can 
dial up today at (408) 338-9511. 


DDJ 
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Work Smart 
with These Powerful 
C Utilities 


Get more value from your C system. 
Boost program quality and slash de- 
velopment time with these professional 


utilities for leading C-compiler systems. 
C Utility Library 


syas $155 
Over 300 C subroutines Ja 


C and assembler source code and 
demonstration programs for screen han- 
dling, color printing, graphics, DOS 
disk and file functions, memory manage- 
ment and peripherals control. 


C-tree $395 $329 
B-Tree database system 

Store, update and retrieve records 
easily. High-level multi-key ISAM 
routines and low-level B-Tree 
functions. Available for MS-DOS, CP/ 
M-86, and CP/M-80. Easily transpor- 
ted. Adaptable for network and 
multiuser. Includes source. 


PHACT $295 $200 
Data Base Record Manager 

Includes high-level features 

found in larger database systems. 
Available for MS-DOS, CP/M-86 


and CP/M-80. 

Pre-C $395 $329 
LINT-like source code analyzer 
Locates structural and usage errors. 
Cross-checks multiple files for bad 


parameter declarations and other inter- 


face errors. 
$195°$ 165 


Windows for C 
Versatile window utility 

Supports IBM PC compatible and some 
non-compatible environments. 
PANEL $295 $235 
Screen generating utility 

Create custom screens via simple, 
powerful editing commands. Select 
colors, sizes and types, edit fields. 
Includes direct input utility. 


HALO $260 $199 


Ultimate C graphics 
A comprehensive package of graphics 
subroutines for C. Supports multiple 


graphics cards. 
PLINK-86 $395 $315 


Overlay linker 


Includes linkage editor, overlay manage- 
ment, a library manager and memory 
mapping. Works with Microsoft and 
Intel object format. 


1 800-TEC- WARE 


(In NJ call 201-530-6307) 


UNIX a regstered TM of Bell Laboratones, C-uee, TM Faircom. Inc . PHACT TM PHACT ASS¢ 
Pret. PLINK. x6, TM PHOENIX. HALO TM Media Cybernetics, Inc . PC lint TM GIMPLE ware 
PANEL TM Roundtull Computer Systems. Lid.. WINDOWS FOR C T™ Creauve Sotupons. € 
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Thinking 
about 
C? 


Stop Thinking- 
Start Programming Today! 


SPECIAL INTRODUCTORY OFFER! 
C’ Prime, Personal Computing and C, 


Plus Apprentice C. 
A $169 value only 


$99 





NEW FROM MANX AZTEC! 
C’ Prime 39 $79 


Never has C been easier to learn. 
Manx Aztec is now offering a com- 
plete C system called C’ Prime at an 
exceptionally low price. This powerful 
system includes a Compiler, Linker, 
Assembler, Editor, Libraries and Ob- 
ject Librarian. C PRIME supports a 
host of third-party software. 


C Apprentice $4955 $39.95 


Learn C quickly with this complete, 
easy-to-use C language interpreter. 
Apprentice C includes a complete one- 
step compiler that executes with lightn- 
ing speed, an editor, and a 

run-time system. 


NEW FROM ASHTON-TATE! 
Personal Computing and C 


A detailed, easy-to-understand guide to 
C programming prepared especially by 
Ashton-Tate for use with the new 
Aztec C’ Prime. Includes chapters on 
C programming basics, function 
libraries, data handling, and advanced 
features, plus a complete money man- 
agement demonstration program. 


To order or for information call: SS 
Cs QO 


/GWARE A 


1 800-TEC-WARE & 


(In NJ call 201-530-6307) 
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$395 COMPLETE 


Specify diskette format: 
e 5%" MS-DOS 

e 8” CP/M 

@ 3A" Mac 

e8” RT-I| 
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For VISA, MC and COD orders 


call (314) 445-6833 
FairCom 

2606 Johnson Drive 
Columbia, MO 65203 


© 1985 FairCom 


The following are trademarks: c-tree and the circular disk logo—FairCom; MS—Microsoft Inc.; 
CP/M and Access Manager—Digital Research Inc.; Unix—AT&T; Apple—Apple Computer Co. 
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Brand New From Peter Norton 
A PROGRAMMER’S EDITOR 


=NORTON 








Direct from the 
man who gave you 
The Norton Utilities, 
Inside the IBM PC, 
and the Peter Norton 
Programmer's Guide. 





Peter Norton, 2210 Wilshire Blvd., #186 
Santa Monica, CA 90403, 213-826-8032 
Visa, MasterCard and phone orders welcome 
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that’s Lightning fast with the hot 
features programmers need 


‘This is the program- 


mer’s editor that I wished 
I’d had when I wrote my 
Norton Utilities. You can 
program your way to 
glory with The Norton 











Dr.Dobb's 
Catalog — 


Continuing the tradition of 

providing its readers with 
useful, powerful software tools, 

Dr. Dobb's Journal of 

Software Tools presents this 

collection of programming tools 

in the form of books and 
software on disk. 















































































































Announcing Dr. Dobb’s Journal of 
for May Software Tools for 1984: over 
PE 1000 pages of text and code. 
commemorate the coe 
of Volume 9, we are offering 
Dr. Dobb's a discount on the full set 
Bound Volume 9 of Bound Volumes. This set 
includes every issue of DDJ 
This ninth volume in the from 1976 through 1984. 
Dr. Dobb’s Bound Volume If you order the set now, you 
series contains the com- will receive a $40 discount. 
plete editorial contents of Se aa Ca ee 
& 
DD/J Listings on Disk To Order: 
’ : 2 : S 
<n So it, and Also Inside products, return the order 
g. ieee form at the end of this 
e Dr. s Comple 
Dr. Dobb’s Journal of Toolbox of C e a 
Software Tools now offers a 1-800-528-6050 EXT. 4001 
listings service. The first disk | ¢ A Unix-like Shell for eat tes - 
taining most of the program number, title, and disk 
listings that appeared in the | « A Unix-like Utility Package | format. | 
magazine from January for MS DOS by Allen For customer service 
through April 1986. This Holub questions, 
accompaniment to the CALL M&T 
magazine is available in ¢ Dr. Dobb’s Z80 Toolbook PUBLISHING, INC. 
various formats. by David Cortesi 415-366-3600 EXT. 209 
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Programs by the Pound 





Announcing: 
Dr. Dobb's 


Bound Volume 9 


Over 1000 pages of listings 
and text. The entire 1984 edi- 
torial contents of Dr. Dobb's 
Journal of Software Tools. 













Bound Volume 9: 1984 
Item #020B 


Shaping things to come. In 
1984 new Editor-in-chief 
Mike Swaine brought his 
interests in advanced tech- 
nology to Dr. Dobb’s Journal. 
We presented the concepts 
behind Prolog and published 
an expert system for weather 
prediction. We learned 






























Modula-2, and taught Forth 
to talk to a 68000, to MS DOS, 
and to the people of China. 
We examined a new language 
implementation called 
Turbo Pascal and extended 
implementations of C with 

a preprocessor, a library, 
Tony Skjellum’s tricks, and 
Allen Holub’s Grep. We 


encryption systems, tele- 
communications protocols, 
floating-point benchmark 
results, and an issue devoted 
to the internals of Unix. 
And Ray Duncan, Bob 
Blum, and Dave Cortesi 
were on hand with their 
fascinating columns. 

















Dr. Dobb’s 


Bound Volume 1: 1976 
Item #013 


The working notes of a 
technological revolution. 
Programmers from Defense 
laboratory systems analysts 
to kitchen-table entre- 
preneurs worked for the 
intrinsic rewards to put 
development software on the 
brand-new invention, the 
microcomputer. Before there 
was an Apple, Dr. Dobb's 
Journal of Tiny Basic 
Calisthenics and Orthodontia 
(subtitle: Running Light 
without Overbyte) was 
founded to put a program- 
ming language on the 
machines, and became both 
chronicler and instrument 
of the revolution. In this 
first-year volume: Tiny Basic, 
the first word on CP/M, 
notes on building an IMSAT, 
floating-point and timer 
routines. 















Bound Volume 2: 1977 
Item #014 


Running light without over- 
byte. By year two, Dr. Dobb’s 
formula was concocted: 
tough questions and serious 
technical issues handled 
with enthusiasm, wit, and 
scant reverence for the 
accepted answers. Source 
code. Tools for programmers. 
Respect for tight program- 
ming. Dr. Dobb’s Journal 
readers shared insights 

on warping the Intel 8080 
into a computer CPU, and 
Dr. Dobb’s published a 
complete operating system 
for the chip. A motley crop 
of computers and software 
products were popping up, 








Bound Volumes 






and Dr. Dobb’s investigated: 
the Heath H-8, the KIM-1, 
the Alpha Micro, MITS 
Basic, Poly Basic, and 
Lawrence Livermore Labs 
Basic. Dr. Dobb’s introduced 
Pilot for microcomputers 
and published tips on doing 
string handling, high-speed 
I/O, and turtle graphics in 
limited memory. 











Bound Volume 3: 1978 
Item #015 


The roots of Silicon Valley 
growth. In 1978 Steve 
Wozniak and other pro- 
grammers were publishing in 
Dr. Dobb’s Journal code that 
would help them grow multi- 
million-dollar computer 
companies. The proposed 
S-100 bus standard was 
hashed out in Dr. Dobb's 
pages. Dr. Dobb’s contributors 
began to speak more in terms 
of technique than of specific 
implementations as the 
industry began to diversify. 
Languages covered in depth 
included SAM76, Pilot, 
Pascal, and Lisp. 








To Order: 


To order any of Dr. Dobb’s 
products, return the order 
form at the end of this 
catalog, or 


CALL TOLL-FREE 
1-800-528-6050 EXT. 4001 
and refer to product item 
number, title, and disk 
format. 

For customer service 
questions, 

CALL M&T 
PUBLISHING, INC. 
415-366-3600 EXT. 209 
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Bound Volume 6: 1981 






























































published in their entirety in 
Dr. Dobb's pages that year; 


maneuver to ensure that 
good tools for CP/M pro- 






















































Bound Volume 4: 1979 





















































Item #016 Item #018 : 
ammers would continue there were Ed Ream’s RED 
In the midst of the Gold The first of Forth. 1981 saw 2 be developed and circu- screen editor and a version 
Rush. Three years before Dr. Dobb’s first all-Forth lated, and the 16-Bit Software | of the Ada language called 
IBM would release its PC, a issue (now sold out), along Toolbox to investigate the Augusta. 
thriving, rough-and-tumble a a emphasis on oe 8088/86 and other new 
personal computer industry , telecommunications, an < 
existed. Fortunes had been new languages. David Cortesi fished enn Buy the ones set 
made and lost, the effective began “Dr. Dobb’s Clinic?’ and Z8000 processors, and and save 15% 
power of the machine multi- one of the magazine’s most looked ahead. ina provoca- If you buy all nine volumes, 
plied a hundredfold. By popular features. Highlights tive essay, to fifth-generation covering the entire editorial 
1979 some stability had even included information on computers. content of Dr. Dobb’s Journal 
emerged; one could speak PCNET, the Conference of Software Tools from the 
of the processors that had Tree, the Electronic Phone | i first issue in 1976 through 
proven longevity as micro- Book, Tiny Basic for the Bound Volume 8: 1983 1984, you pay just $225. 
computer CPUs: the 8080, 6809, writing your own Item #020 That’s a 15% discount and 
the Z80, the 6800, and the compiler, and a systems Power tools. Personal com- over $40 off the combined 
6502. Dr. Dobb’s Journal programming language. puters were proving them- individual prices. To order 
focused on the best ways to selves to be true professional | the complete set of Bound 
use these processors, with Bound Volume 7: 1982 | software development tools Volumes | through 9, ask 
algorithms, tips, and code Ttem #019 by 1983, the year in which for item #020C. 









for 8- to 16-bit conversion, 


Jim Hendrix completed his 
pseudo-random number 


Legitimacy. By 1982 IBM 
“canonical” version of 


had become a player in the Item #013 = $27.75 Vol. 1 


Item #014 = $27.75 Vol. 2 































































generation, micro-to- rsonal computer gameand | Small C in Dr Dobb’s Journal. 

mainframe connections, ae Eps nate lek New | Dr Dobb's published more Item #015 $27.75 Vol. 3 
telecommunications, and microprocessors arrived 68000 and 8088 code, and Item #016 $27.75 Vol. 4 
networking. And lots of tha ret desdetedd aveciaily “1 asthe memory limitations’. |. Jana? S225. Von 5 
useful code. to serve as personal com- relaxed, the magazine’s ee a ee wr ? 

puter CPUs. In Dr. Dobb’s commitment to tight code et Le cer 

Bound Volume 5: 1980 Journal Dave Cortesi pub- let it shoehorn impossibly tem ue $31.75 Vol. 8 
Item #017 lished the first serious large systems into memory. Item #020B $35.75 Vol. 9 
The preeminence of CP/M comparison of MS DOS and | Small C was just one of the All9 volumes 





Item #020C $225.00 


To Order: 


To order any of Dr. Dobb’s 
products, return the order 
form at the end of this 
catalog, or 


CALL TOLL-FREE 
1-800-528-6050 EXT. 4001 
and refer to product item 
number, title, and disk 
format. 


CP/M-86. Dr. Dobb’s started major software products 


two new columns: the CP/M 
Exchange, as a rearguard 


_ and the rise of C. More 
than any other magazine, 
Dr. Dobb’s Journal was 
responsible for the spread 
of CP/M and C on micro- 
computers. Both of those 
movements began in 1980. 
Dr. Dobb’s all-CP/M issue, 
including Gary Kildall’s 
history of CP/M, sold out 
within weeks of publication. 
This was the year of Ron 
Cain’s original Small C com- 
piler, of a CP/M-oriented 
C interpreter, CP/M-to- 











































UCSD Pascal file conversion For customer service 
questions, 
techniques, and of a greater ere - 


concern in Dr. Dobb's with 
software portability. 





PUBLISHING, INC. 
415-366-3600 EXT. 209 
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A collection of powerful tools 
for C software developers, 
including books, software on 
disk, and reference materials 
from the publisher of Dr. Dobb's 
Journal of Software Tools 


Dr. Dobbs 
Complete C Toolbox 






























































From M&T Publishing and Dr. Dobb’s offers the While both the Handbook While both the Handbook 
Brady Communications... Toolbook in a special hard- and the Toolbook provide and the Toolbook provide 

j bound edition for just $29.95. documentation for the documentation for the 
Dr. Dobb's You'll find: Small-C compiler, the Small-C compiler, the 
Toolbook of C Jim Hendrix’s famous Handbook contains a more Handbook contains a more 
Item #005 Small C Compiler and New detailed discussion and is detailed ee - 
The Toolbook contains over Library for Small C (both available with an addendum available with an addendum 
700 pages of C material, also available on disk), for the ee ee version. = eee ace bee 
including articles by such NEW: Hendrix’s Small Mac: | _ The Handbook, Item #006, e MS) 

An Assembler for Small C is just $17.95. Jim Hendrix Handbook Addendum is 

C experts as Kernighan and er for : a additi 
Ritchie, Cain and Hendrix, and Small Tools: Programs has ported the compiler to recommended in addition to 

Salto for Text Processing (both also | the MS/PC DOS environ- the Handbook for MS DOS 
Skjellum and Holub. The or Te ing (bo he Han \ PC DOS 
level is sophisticated and available on disk), ment since the Handboo - Thes aall-C Co ss 
pragmatic, appropriate for All of Tony Skjellum’s se tate for $19.9 Rarenhies 
professional C programmers. C Programmer’s Notebook the CP/M or the MS/PC 

The most valuable part of | columns distilled by Tony  , DOS ae . 
the Toolbook to many will into one thought-provoking | 
be the hundreds of pages chapter. 
of useful C source code, ‘Kunde Small-C Compiler 
including a complete com- phan #007 
piler, an assembler, and text- M&T Publishing and a A 

ste: Brady Communications. . Jim Hendrix’s Small-C 
processing utilities. The ; Compiler is the most popular 
a hears yiné oe ea > piece of software ever pub- 
Tee lished in Dr. Dobb’s 10-year 
tee 7 ae ea wee history. Like a home-study 
ey did. fe a ‘ : 

Dr. Dobbs Journal of Pe dt epee ee 
Software Tools introduced a Srrall-C Han Jbock -cewills 
ees Cpe onal com: The Small C everything you need but the 
aged ae Ai ee Handbook computer for learning how 
ae g language, compilers are constructed, 
and all the best C articles Item #006 or #006A ; 

and for learning C at its most 
and code published in Tin Heraitix’s Saadee Sardunierssl ra 
Dr. Dobb's over the years is Handbook is the reference ‘ 
included and updated in the | book on his Small-C com- was printed, and the Hand- 
Toolbook, including Ron iler. In addition to describ- book plus his MS/PC DOS 
Caiiser sina Sama C 2 othe opeeuie atte Handbook Addendum, Item To Ord er 
article and articles from sold- | compiler, the book contains #006A, is $22.95. f eae ie 
also includes material never the compiler and its library Dr. Dobb's ae ear : ‘his =! 
before published, including of arithmetic and logical Software Tools on Disk | !0%™ at the end of this 
Jim Hendrix's complete routines. To complement the Toolbook, catalog, or 
macro assembler in C. A perfect companion Dr. Dobb’s also offers the CALL TOLL-FREE 
to the Hendrix Small-C following programs on disk. 1-800-528-6050 EXT. 4001 
compiler offered by Dr. Dobb’s | Full C source code and and refer to product item 
on disk, the Handbook even sone ree : epee iets title, and disk 
tells how to use the compiler xcept where indicat t 
to generate a new version CP/M and MS/PC DOS For customer service 
of itself. versions are available. questions, 
CALL M&T 
















































PUBLISHING, INC. 
415-366-3600 EXT. 209 









Small-Mac: An 


Assembler for Small-C 
Item #012A 


Small-Mac is an assembler 
designed to stress simplicity, 
portability, adaptability, and 
educational value. The 
package features a simplified 
macro facility, C language 
expression operators, object 
file visibility, descriptive error 
messages, and an externally- 
defined machine instruction 
table. You get the macro 
assembler, linkage editor, 
load-and-go loader, library 
manager, CPU configuration 
utility, and a utility to dump 
relocatable files. 

Small-Mac is available 
with documentation for 
$29.95. For CP/M systems 
only. 


Small-Tools: Programs 
for Text Processing 


Item #010A 

A package of programs per- 
forming specific, modular 
operations on text files, 
including: editing; formatting; 
sorting; merging; listing; 
printing; searching; changing: 
transliterating; copying; 
concatenating; encrypting 
and decrypting; replacing 
spaces with tabs and tabs 
with spaces; counting char- 
acters, words, or lines; and 
selecting printer fonts. 
Supplied in source code 
form so you can select and 
adapt these tools to your 
OWN purposes. 


Small-Tools is available 
with documentation for 
$29.95. For CP/M or MS/PC 
DOS systems. 


Special Packages — 
20% Off 

Now for almost 20% off the 
combined individual product 
prices, you can order a 
complete set of Dr. Dobb’s 

C programming tools for 
your CP/M or MS/PC DOS 
system. 


C Package for CP/M 
Item #005A 


Ordered individually, these 
items would cost about $120. 
If you order the CP/M C 
package, you’ll get Dr. Dobb’s 
Toolbook, the Small-C 
Handbook, the Small-C 
Compiler on disk, the Small- 
Mac assembler on disk with 
documentation in the Small- 
Mac Manual, the Small-Tools 
text-processing programs 

on disk with documentation 
in the Small-Tools Manual, 
all for just $99.95. 


C Package for 
MS/PC DOS 
Item #005B 


These items would cost 
over $100 if purchased 
individually. If you order the 













Dr. Dobb’s 


MS/PC DOS C package, 
you'll get Dr. Dobb’s Tool- 
book, the Small-C Handbook 
with the MS/PC DOS 
Addendum, the Small-C 
Compiler on disk, the Small- 
Tools text-processing 
programs on disk with 
documentation in the Small-- 
Tools Manual, all for just 
$82.95. 


Dr. Dobbs Sourcebook: 
A Reference Guide to 
the C Programming 
Language 

Item #004 

Products and services for 

C programmers are appear- 

ing at so rapid a rate that it’s 

all but impossible to keep 
up with them. Dr. Dobb’s 
presents this handy guide to 
the who, what, when, where, 
and why of C. A compre- 
hensive reference manual to 
new information, products, 
and services, the Sourcebook 
contains: 

e A bibliography of over 300 
articles and books on the 
C language; 

e A descriptive list of prod- 
ucts for C programmers: 
compilers, editors, inter- 
preters, and utilities; 

e A list of C-related services: 
Classes, seminars, and 
on-line services. 

The Sourcebook is just $7.95. 









Complete C Toolbox 





Dr. Dobb’s Sourcebook: A 
Reference Guide to the 


C Programming Language 
Item #004 $ 7.95 


Dr. Dobb’s Toolbook for C 
Item #005 $29.95 


The Small-C Handbook 
Item #006 $17.95 
The Small-C Handbook and 


MS/PC-DOS Addendum 
Item #006A $22.95 


Small-C Compiler disk 
Item #007 $19.95 
Small Tools: Programs for 


Text Processing disk 
Item #010A $29.95 


Small Mac: An Assembler 
for Small-C disk (For CP/M 


only.) 

Item #012A $29.95 
CP/M C Package 

Item #005A $99.95 
MS/PC DOS C Package 
Item #005B $82.95 


For CP/M disks, please 
specify one of the following 
formats: Apple, Osborne, 
Kaypro, Zenith Z-100 DS/ 
DD, 8” SS/SD. 


To Order: 


To order any of Dr. Dobb’s 
products, return the order 
form at the end of this 
catalog, or 

CALL TOLL-FREE 
1-800-528-6050 EXT. 4001 


and refer to product item 
number, title, and disk 
format. 

For customer service 
questions, 

CALL M&T 
PUBLISHING, INC. 


415-366-3600 EXT. 209 
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Finally! 
You've Asked For It For 
Years and Here It Is! 





















Dr. Dobb's 
Listings On Disk 

Dr. Dobb’s Journal of 
Software Tools has always 
provided its readers with 
valuable code. Now, as a use- 
ful adjunct to the magazine, 
DDI offers the additional 
value and convenience of 
selected listings on disk! 

Dr. Dobb’s Listings #186 

is a collection of listings 
from Dr. Dobb’s January 
1986 issue, through the 
April 1986 issue. In this first 










of three Dr. Dobb’s Listings 
disks for 1986 you'll find 
listings from the following 
DD] articles, among others. 


From Issue #111 
January 1986 


** 4 Simple OS for Real-time 
Applications; 68000 assembly 
language techniques for an 
operating system kernel by 
DDJ editor Nick Turner 

** F’xec calls and Fortran; a 
technique allowing execution 
of a user or system task from 
a user program from DDJ’s 
16-Bit Software Toolbox, 

by Robert Sypek 











Dr. Dobb’s 





** 32-bit Square Roots; An 
8086 assembly-language 
routine for 32-bit square roots 
by Michael Barr 


From Issue #112 
February 1986 


** Fast Integer Powers for 
Pascal; An implementation 
of the fastest-known algorithm 
for the computation of integer 
powers by Dennis E. 
Hamilton 

** Data Abstraction with 
Modula-2; Construction of a 
priority queue in Modula-2 
by Bill Walker and Stephen 
Alexander 

**T earning Ada on a Micro; 
A draw poker program in Ada 
by Do-While Jones 

** Fast IBM PC graphics 
routines from DDJss 16-Bit 
Software Toolbox, by Dan 
Rollins 














From Issue #113 
March 1986 


** Recursive Bose-Nelson 
Sort; An alternative to Joe 
Celko’s September 1985 sort 
routine by R.J. Wissbaum 
** 4 Variable-Metric 
Minimizer; A C program for 
minimizing arbitrary functions 
by Joe Marasco 





Listings On Disk 


** Concurrency and Turbo 
Pascal; An approach to 
implementing coroutines in 
Pascal by Ernest Bergmann 
** Speeding MS DOS Disk 
Access; Programs to test 
disk-access speed by Greg 
Weissman 

** Square Roots on the 
NS32000; Comparable square 
root routines in C and 
assembly language for National 
Semiconductor’s 3200 family 
by Richard Campbell 




























From Issue #114 
April 1986 


** Boca Raton Inference 
Engine; Lisp, Prolog, and 
Expert-2 techniques and code 
by Robert Brown 


Item #170 $14.95 
Dr. Dobb’s Listings #186 
Please specify MS/DOS, 
Macintosh, or CP/M. For 
CP/M disks, please specify 
one of the following formats: 
Apple, Osborne, Kaypro, 
Zenith Z-100 DS/DD, 

8” SS/SD. 


To Order: 


To order any of Dr. Dobb's 
products, return the order 
form at the end of this 
catalog, or 

CALL TOLL-FREE 
1-800-528-6050 EXT. 4001 


and refer to product item 
number, title, and disk 
format. 

For customer service 
questions, 

CALL M&T 
PUBLISHING, INC. 
415-366-3600 EXT. 209 




















Only $29.95 each! 
Both for only $50 — 
save over 15%! 


Includes complete 
source code and 
documentation. 





A UNIX-like Shell 
for MS-DOS and 
A UNIX-like Utility 

Package for MS-DOS 


by Dr. Dobb’s C-Chest 
columnist, ALLEN HOLUB 


The Shell 


A MS-DOS implementation 
of the most often used parts 
of the UNIX C shell. This 
package includes an exe- 
cutable version of the shell, 
along with complete C source 











Supported features are: 
Editing Command line 
editing with the cursors is 
supported. The line is visible 
as you edit it. 

Aliases Can be used 

to change the names of 
commands or as very fast 
memory resident batch files. 
History The ability to 
execute a previous com- 
mand again. The command 
can be edited before being 
executed. 

Shell Variables Macros 

that can be used on the 
command line. 

Nested batch files A batch 
file can call another batch 
file like a subroutine. Control 
is passed to the second file 
and then back to the first 
one when the second file is 
finished. DOS doesn’t have 
this capability. 


-code and full documentation. 





























UNIX-like syntax Slash (/) 
used as a directory separator, 
minus (—) as a switch desig- 
nator. A 2048 byte command 
line is supported. Command 
line wild card expansion. 
Multiple commands on 

a line. 


The shell also supports 
redirection of standard 
input, standard output, and 
standard error. 

This version corrects 
several bugs found in the 
original version printed in 
Dr. Dobb’s Journal, December 
1985 through March 1986 
issues. It runs on any MS- 
DOS computer. 


Add additional features to 
the Shell with 


/util 
A UNIX-like Utility Package 
for MS-DOS 


This collection of utility 
programs for MS-DOS 





































includes updates of the 
highly acclaimed Dr. Dobb’s 
articles Grep: A UNIX-Like 
Generalized Regular Expres- 
sion Processor, Ls from 

Dr. Dobb’s C Chest column, 
and Getargs from DDJ’s 

C Chest. 

Source code is included 
and all programs (and most 
of the utility subroutines) 
are fully documented in a 
UNIX-style manual. You’ll 
find executable versions of: 
cat A file concatenation and 
viewing program 
cp A file copy utility 
date Prints the current time 
and date 
du Prints amount of space 
available and used on a disk 


echo Echoes its arguments 
to standard output 


nell and 
-DOS 


grep Searches for a pattern 
defined by a regular 
expression 

Ls Gets a sorted directory 
mkdir Creates a directory 
mv Renames a file or 
directory. Moves files to 
another directory. 

p Prints a file, one page at 
a time 

pause Prints a message and 
waits for a response 
printenv Prints all the 
environment variables 

rm Deletes one or more 
files 

rmdir Deletes one or more 
directories 

sub Text substitution utility. 
Replaces all matches of a 
regular expression with 
another string. 








Order The Shell and /util 
together for only $50! 
SAVE OVER 15%! 


Item #160 

The Shell 

Item #161 

/util 

Item #162 
Shell/util Package 


To Order: 


To order any of Dr. Dobb’s 
products, return the order 
form at the end of this 
catalog, or 

CALL TOLL-FREE 
1-800-528-6050 EXT. 4001 
and refer to product item 
number, title, and disk 
format. 


For customer service 
questions, 

CALL M&T 
PUBLISHING, INC. 
415-366-3600 EXT. 209 
4 } 


$29.95 
$29.95 
$50.00 
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David E. Cortesi 
longtime Dr. Dobb's 
columnist and author 
of Inside CP/M 
brings you — 




























Dr. Dobb's 
Z80 Toolbook 


Here’s all you need to write 
your own Z80 assembly 


language programs for 
only $25! 


Do you use CP/M? Do you 
feel as if the only part of the 
computer industry that has 
not abandoned you is your 
own Z80 computer? It keeps 
on working, but when you 
need programs for it, you 
have to write them yourself. 
When you do, you quickly 
find that while Pascal or 
BASIC is okay for some 
things, there is often no 
substitute for the speed, 
small size, and flexibility 

of an assembly language 
program. 


Dr. Dobb’s Z80 Toolbook 
puts the power of assembly 
language in the hands of 
anyone who’s done a little 
programming. You'll find: 
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** A method of designing 
programs and coding them in 
assembly language. Cortesi 
will take you on a walk 
through the initial specifica- 
tions, designing an algorithm 
and writing the code. He 
demonstrates this method 
in the construction of several 
complete, useful programs. 
** A complete, integrated tool- 
kit of subroutines for arith- 
metic, for string-handling, 
an for total control of the 
CP/M file system. They 
bring the ease and power of 
a compiler’s runtime library 
to your assembly language 
work, without a compiler’s 
size and sluggish code. 

Best of all, every line of the 
toolkit’s sorce code is there 
for you to read, and every 
module’s operation is 
explained with the clarity 
and good humor for which 
Dave Cortesi’s writing is 
known. 
































Dr. Dobbs 
Z80 Toolbook 














Order the Z80 
Software on Disk! 
Save Yourself the 
Frustration of 

File Entry 

All the software in Dr. Dobb’s 
780 Toolbook—the programs 
plus the entire toolkit, both 
as sorce code and as object 
modules for both CP/M 2.2 
and CP/M Plus—is yours on 
disk. (A Z80 microprocessor 
and a Digital Research Inter- 
national RMAC assembler 
or equivalent are required.) 
Receive Dr. Dobb’s Toolbook 
for Z80, along with the 


software on disk, together for 
only $40! 


Item #022 $25 
Dr. Dobb’s Toolbook for Z80 
Item #022A $40 





Dr. Dobb’s Toolbook for Z80, 

















































together with software on 
disk. Please specify one of 
the following formats: 8” 
SS/SD; Apple; Osborne; 
Kaypro. 





To Order: 


To order any of Dr. Dobb’s 
products, return the order 
form at the end of this 
catalog, or 


CALL TOLL-FREE 
1-800-528-6050 EXT. 4001 
and refer to product item 
number, title, and disk 
format. 

For customer service 
questions, 

CALL M&T 
PUBLISHING, INC. 
415-366-3600 EXT. 209 
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Please Refer to Item # When Ordering 
aly Same 2p Or, fill out this postage-paid, self mailing order form 





and return to: M&T Publishing, Inc., 501 Galveston Dr., 


Day Phone ( ) Redwood City, CA 94063. 





For disk orders, please indicate format. Refer to ad for standard format availability for each product. 


MS/DOS 
C] CP/M ‘—uS¥DM == Apple 3 Fonith 7.100 DSiDD. ..Osbome == ss 8" SSS 
Macintosh 
Special formats available for additional $10 per product. Please inquire. 
: Quantity Item # Description Price Ea. Total Price 











CA residents add applicable sales tax on merchandise total —__% 
(CA residents must add tax to all items EXCEPT Dr Dobb’s Sourcebook, Item #004) — > 








= Name on Card 
. C1) Check CI visa a 
: __ Make checks payable to C] MasterCard ae 
__ M&T Publishing, Inc. Expiration Date 
oe C] American Express 

: Signature 





In U.S. For Bound Volumes, add $2.25 per book. Add $8.75 for special 
C Packages. For other books and disks, add $1.75 per item. 


Outside U.S. For Bound Volumes, add $5.25 per book surface mail. Add Pr ompt Del i very I 
$18 surface mail for Special C Packages. For other books and disks, add 
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Write-Hand Man 


“Almost a Sidekick for CP/M” 
Ted Silveira—Computer Currents, Aug. 27, 1985 


“WHM is ingenious and works as intended” 
Jerry Pournelle, BYTE Magazine, Sept. 1985 (c) McGraw-Hill 


Now available for CP/M 2.2, CP/M 3.0 and ZRDOS! 


The convenience of Sidekick on your CP/M machine! Trigger 
Write-Hand-Man with a single keystroke and a window pops open 
to run desk accessories. Exit Write-Hand-Man and both the screen 
and program are restored. Use with any CP/M program and most 
any CP/M machine. Takes only 5K of memory. 


FEATURES Notepad for quick notes File and Directory viewer 










Appointment calendar Quick access phonebook 
HEX calculator 14 digit decimal calculator 
BON US Add applications written by you or others! No other “Sidekick” 






lets you add applications. Dump screens, setup printers, 
communicate with other computers, display the date and time. 
Let your imagination run wild! 


$49.95 (California residents add tax), shipping included. COD 
add $2. Sorry, no credit cards or purchase orders. 30 day guarantee. 
Formats: 8 inch IBM, Northstar and most 5 inch (please specify). 


Write-Hand-Man only works with CP/M 2.2, ZRDOS and CP/M 3.0 
(please specify). Simple terminal configuration required. Not avail- 
able for TurboDOS. Compatible with keyboard extenders, hard 
disks, and other accessories. 


Poor Person Software 
3721 Starr King Circle 
Palo Alto, CA 94306 
415-493-3735 


Trademarks: Write-Hand-Man — Poor Person Software, CP/M—Digital Research, 
Sidekick—Borland International 
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OTHER OASYS 8086 TOOLS AVAILABILITY 
¢ Supports 8086/88/87/186/286 e Symbolic C Source Level Debuggers Native: PC/XT/AT, all PC look-alikes, 
e Runs in native and cross modes e Intel compatible Macro Cross and DS-32 PC Co-Processor 
e Complete K&R C plus V7 & Ill extensions Assembler/Linker/Locator running MS/DOS, PC/DOS, 
e Built-in LINT facility e Overlay PC Linker and Xenix. 
e Addressing Models: small, compact, medium, — © 8086/186 Simulator 7 : 
large, huge ¢ 80+ function Floating Point Library Cross: VAX VMS/Unix, Pyramid, 
¢ Over 250+ functions in Run-time Library e C Profilers Sun, Masscomp, Apollo, 
e In-line assembly supported ¢ QA tools Cea dozens more. 
e Intel & Microsoft compatibility at source and ¢ C Interpreter with Dynamic Linking You name it... 
object levels Loader 5 
e Written in C; easily ported e C Run-time Analyzers OASYS provides a “One-Stop 
e Highly optimized: 25%-40% tighter code ¢ C Documentor/Formatters Shopping” service for more than 
e Compiles over 1,000 lines/min.; 2+ times ¢ Up/down Line Communication Tools 125 products running on, and/or 
faster than Lattice ¢ Full screen, multi-window Editors/WPs targeting to, the most popular 32-, 
e Generates ROMable code e Unix-like Tools for PC 16- and 8-bit micros and operating 
e Ideal for embedded real-time system or PC e Software design tools systems. 


application development 


| e Supports DOS 2.x and 3.x, IBM/BIOS 
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OUR INTEL SOFTWARE TOOL KIT KEEPS ON GROWING ... 














Parallel Programming for “C” 
TEAMWORK 


A Concurrent Programming Toolkit 


Teamwork is a “C” program library which allows you to 
write your programs as a set of cooperating concurrent 
tasks. Very useful for simulation, real-time applications, 
and experimentation with parallel programming. 


FEATURES 


Supports a very large number of tasks (typically more 
than 50) limited only by available memory. Low overhead 
per task results in very fast context switching. 

Provides a full set of inter-task communication (ITC) 
facilities, including locks, semaphores, blocking queues, 
and UNIX*-style signals. Also has building blocks for 
constructing your own ITC facilities. 

Handles interrupts and integrates them into task 
scheduling. Supply your own interrupt handlers or block 
tasks on interrupts. 

Lets you trace task switches and inter-task 
communication. 

Comes with complete documentation including a user’s 
manual and reference manual of commands. 


Teamwork is available for the following systems: 


Hardware Operating System Price 
IBM PC, XT, AT PC-DOS 2.0 or later $ 65 
IBM PC AT XENIX* $ 85 
DEC VAX* UNIX 4.2BSD $195 


PC-DOS version is compatible with DeSmet, Lattice, and 
Microsoft C compilers. 


Please specify hardware and operating system when 
ordering. Send check or money order to: 


Block Island Technologies 
Innovative Computer Software 


13563 NW Cornell Road, Suite 230, Portland, Oregon 97229-5892 


“Trademarks: UNIX, AT&T Bell Laboratories, Inc.: XENIX, 
Microsoft, Inc.; VAX, Digital Equipment Corporation 
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We Specialize In: 
Cross/Native Compilers C, Pascal, Fortran, Cobol, Basic, APL, 
PL/1,Prolog, Lisp, ADA — Assemblers/Linkers — Symbolic 

Debuggers — Simulators — Interpreters — Translators 
Converters — Profilers — QA Tools — Design Tools — Comm. Tools 
OS Kernels — Editors — Spreadsheets — Data Bases — VAX & PC 
Attached Processors and more 
We Support: 
680xx, 80x86, 320xx, 68xx, 80xx, dozens more 
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PROGRAMMERS SERVICES 


OF INTEREST 





The theme of this month's 
column is user-interface 
design. 

The Research Group 
has announced SayWhat?!, 
a productivity tool de- 
signed to shorten the time 
required for screen design 
and at the same time in- 
crease the impact of screen 
displays for dBASE II and III, 
BASIC, and Turbo Pascal 
programs. It is an unpro- 
tected menuless system 
that allows users to create 
and edit displays on the 
screen without writing 
any programming com- 
mands or modules. The 
program requires an IBM 
PC/XT/AT or compatible 
with a minimum of 128K 
(384K required for dBASE 
Ill), DOS 2.0 or later, one 
disk drive, and a mono- 
chrome or color monitor. 
It retails for $39.95. 

Wendin is offering three 
new products: Operating 
System Toolbox, PCVMS, 
and PCUnix. Operating Sys- 
tem Toolbox allows users to 
modify and tailor operating 
system software. Full 
source code is available. All 
enhanced system services, 
paged memory manage- 
ment, concurrent input/ 
output, and a multitasking 
scheduler can be used to 
construct powerful person- 
al operating systems for the 
IBM PC/XT/AT. The price is 
$99. PCVMS is an operating 
system that provides multi- 
ple processes, networking 
software, and a command 
set, plus a set of VAX-like 
system services. The price 
with source code included 
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is $49. PCUnix features utili- 
ties such as at, grep, mail, 
nice, and who. The price is 
$49. 


For C 

Gimpel Software has an- 
nounced Amiga-Lint, a di- 
agnostic facility for the C 
programming language 
that runs on the Commo- 
dore Amiga. Amiga-Lint 
analyzes C programs and 
reports on bugs, glitches, 
and inconsistencies. 
Among the errors reported 
on by Amiga-Lint are type 
inconsistencies across 
modules, parameter-argu- 
ment mismatches, library 
usage irregularities, unini- 
tialized variables, value-re- 
turn inconsistencies, vari- 
ables declared but not 
used, suspicious use of op- 
erators, and unreachable 
code. Amiga-Lint runs un- 
der Amiga’s CL1 interface 
and is available for $98. 

Retrieval Technology 
Corp. (RTC) has available 
the All-Hands-on C Video 
Workshop, a six-module, 
five-hour workshop de- 
signed to teach the full fea- 
tures of C. 

Desktop A.I. has re- 
leased a translator that al- 
lows users to move dBASE 
programs into C. The dBx 
Translator system includes 
a language translator for 
processing dBASE source 
code and a run-time li- 
brary toolbox to replace 
the dBASE screen handler. 
The system is designed to 
work with any C database 
manager. In addition, ap- 
plications can be moved to 
machines on which dBASE 
is not available, such as the 
AT&T 3B2 under Unix, AI- 
tos under Xenix, and Mac- 
intosh or Amiga systems. 
The package price ranges 
from $350 to $1,000, de- 
pending on configuration. 

The C-Board is a stand- 


alone C language develop- 
ment system from HiTech 
Equipment that can be 
used on a single STD bus- 
compatible board. The C- 
Board requires a 5V 0.5A 
power source or unregu- 
lated 7—9V DC using an op- 
tional on-card regulator. 
The product features a CPU 
with parallel and serial I/ 
O, timer/counters with 
PWN output, EPROMs and 
EEPROMsS, a threaded inter- 
preter, and interactive de- 
velopment. The OEM ver- 
sion of the card without 
memory devices or man- 
uals costs $199. Volume dis- 
counts are available. 

A PC- and VAx-hosted C 
cross-compiler supporting 
Intel’s 8-bit MCS-51 micro- 
controller family is avail- 
able from Archimedes 
Software. The C-based soft- 
ware development kit im- 
plements the proposed 
ANSI standard for C compil- 
ers and also comes with an 
assembler. The software is 
available for IBM PC/XT/AT 
or compatible systems 
equipped with at least 
512K RAM and using MS DOS 
2.0 or later. Initially, the 
software is also available 
for Digital Equipment’s 
VAX/Unix minicomputer. 
The PC-based version is 
$851; the VAX/Unix version 
is $3,500. VAX/VMS and Mi- 
croVAX versions will also 
be available. 

Alcyon has expanded its 
optimizing C compiler line 
to include cross-develop- 
ment versions for the IBM 
PC/XT/AT. The C68 compil- 
er, priced at $795, produces 
optimized code for the 
M68000/010. The C68/020, 
priced at $995, produces 
optimized code for the 
M68020/68881. Minimum 
requirements are an IBM 
PC/XT/AT, 5-megabyte hard 
disk, 512K, and PC DOS/MS 
DOS 3.0 or later. In addition 


to the IBM PC, Alcyon’s C 
compilers can be hosted on 
systems with Motorola Ver- 
saDOS, DEC VAX/VMX, and 
DEC VAX/Unix. 

The C Trainer Interpret- 
er from Catalytix provides 
users with an interactive 
interpreter for the full C 
language. The interpreter 
enables users to run C code 
without compiling it. Fur- 
thermore, the interpreter’s 
design permits users to run 
program fragments with- 
out requiring that all func- 
tions and libraries be pre- 
sent at run time. The book 
The C Trainer, published 
by Prentice-Hall, accompa- 
nies the interpreter and 
combines a step-by-step tu- 
torial with a separate refer- 
ence section explaining 
many aspects of C. The tu- 
torial’s format is such that 
readers build upon existing 
programs that help them 
understand C in an interac- 
tive fashion. The C Trainer 
Interpreter runs on the IBM 
PC and compatibles, as well 
as the Macintosh. Versions 
are also available for Unix 
and for VAX/VMS computer 
systems. 

CDEBUG (Version 2) from 
Complete Software is a 
portable C language debug- 
ger that shows all C objects 
according to their name 
and type and lets users set 
unlimited break and trace 
points by using regular ex- 
pressions. Requiring mini- 
mal overhead, the interac- 
tive program consists of a 
preprocessor to insert sym- 
bol tables into source code 
and a run-time library to 
interpret and integrate 
with a user environment. 
CDEBUG is available for MS 
DOS, Lattice, Computer In- 
novations, Wizard, VAX/ 
VMS, Unix, and Xenix oper- 
ating systems on disk or 
tape media and will be 
ported. The new version is 
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priced from $350 for PCs 
and $750 for the Unix port- 
ing service. 

Fortrix-C from Rapitech 
Systems is designed to rec- 
ognize and convert most 
FORTRAN VMS extensions 
and translate a typical 
50,000-line program into C 
code on VMS. All comment 
lines remain in place so in- 
ternal documentation is 
retained. 


For the IBM PC 
Midwest Micro-Tek has 
released Circuit Design 
Mate, a software product 
for the IBM PC and compati- 
bles that includes schemat- 
ic capture, automatic parts 
list generation, TTL compo- 
nent library and editor, 
and schematic printing on 
any Epson-compatible dot- 
matrix printer. The system 
requires an IBM PC/XT/AT 
or compatible with 256K, a 
640 X 200 IBM-compatible 
graphics card, two double- 
sided disk drives or one 
disk drive and hard disk, 
and PC DOS/MS DOS 2.0 or 
later. A single copy with 
TTL library is $295. 
Macmillan Software 
has unveiled a menu-driv- 
en software package for 
PCs. Called  Asystant 
Ready-to-Run Scientific 
Software, the package is a 
high-level programming 
language with acquisition, 
analysis, and graphics ca- 
pabilities. Asystant runs on 
IBM PCs and compatibles, 
including the Hewlett- 
Packard Vectra, and uses 
the 8087 coprocessor. A 
second version of the prod- 
uct, called Asystant +, 
adds data acquisition and 
includes built-in interac- 
tive data manipulation, 
analysis, and high-resolu- 
tion color graphics. Asys- 
tant is priced at $495, and 
Asystant + costs $895. 
Dasoft Design Systems’ 
PC2 features an auto-rout- 
er, expandable symbol li- 
brary, enhanced footprint 
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editor with six pad shapes 
and user-definable pad 
layouts, and a component 
“data book” library of 600 
commonly used parts. The 
PC2 can be used on the IBM 
XT/AT and compatibles 
with 512K, a monochrome 
graphics card, hard-disk 
storage, and a mouse. The 
software also runs on the 
AT&T 6300 and the NEC 
9801. It drives most plotters 
including those from Hew- 
lett-Packard, Houston In- 
struments, Western 
Graphtek, Ioline, and com- 
patibles. The software is 
available for $3,495. 

The PC-NTDS Adapter 
Card, a full 32-bit parallel 
NTDS (MIL-STD 1397) inter- 
face board, is available 
from Sabtech Industries. 
The adapter installed in an 
IBM PC/AT utilizes the full 
16-bit data path of the AT 
and can output data at 
speeds of up to one 32-bit 
word every 1.2 microsec- 
onds. This represents a 
transfer rate of up to 834K 
32-bit words per second. 
Software included with 
the NTDs Adapter Card has 
its own interface control 
language, including high- 
level commands such as 
loop, repeat, and compare. 


Utilities 

Sophco has released Sybil, 
a collection of utilities that 
can unerase files, edit sec- 
tors, modify file and direc- 
tory attributes, and find 
files. Sybil comes with a 
print spooler, a RAMdisk, a 
general-regulation expres- 
sion parser, and a graphics 
editor called ASCIIGEN (for 
RGB and IBM _ mono- 
chrome). It runs on the IBM 
PC/XT/AT and compatibles 
and on both 8088 and 80286 
computers. Sybil is priced 
at $49.95. 

Avocet Systems has re- 
leased AVSIMO9, a software 
simulator/debugger for 
the 6809 microprocessor. 
Running on any IBM PC 





the dBx translator 


daBx produces quality C direct 
from dBASE II or III programs. 


Move dBASE programs to UNIX or other machines. 
Improve program speed and reliability 
support multi-user/network applications. 


With power guidebook of conversion hints. 


Includes full screen handler and uses your 
current C database manager 


May be used to move existing programs or help 
GBASE programmers learn C easily 


For MSDOS, PCDOS, UNIX, XENIX, Macintosh, AMIGA. 
(Uses ANSI.SYS driver on MSDOS, CURSES under UNIX) 


Priced from $350, also available from distributors. 


Desktop A.I. 


1720 Post Rd. E. #3 
Westport, CT 06880 


(203) 255-3400 
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OF INTEREST 
(continued from page 123) 


look-alike, AVSIMO9Y inter- 
pretively executes 6809 ob- 
ject code under control of a 
full-screen symbolic de- 
bugger. Devices supported 
include the 6821 PIA (Paral- 
lel Interface Adaptor), 6840 
PTM (Programmable Timer 
Module), and 6850 ACIA 
(Asynchronous Communi- 
cations Interface Adapter). 
AVSIMO9 is priced at $299. 

Modula-2 has been added 
to the list of languages rec- 
ognized by Source Print, 
Aldebaran Laboratories’ 
multifunction, source-code 
formatting utility. For Mo- 
dula-2, Source Print can 
draw lines to indicate mod- 
ule and procedure nestings 
as well as nestings of if, 
while, for, case, loop, and 
repeat structures. Automat- 
ic indentation can also be 
performed. Additional fea- 
tures include facilities for 
indexes, tables of contents, 
pagination, line number- 
ing, keyword emphasis, ex- 
traction of routines, and ex- 
tensive printer control. 
Source Print is for IBM PC/ 
XT/AT and compatibles. 
The source formatting utili- 
ty with 88-page manual is 
$97. 

Written in RM COBOL, 
Myte Myke Software from 
M & D Systems supports 
both single-user and mul- 
tiuser microcomputers as 
well as the more advanced 
local-area networks in- 
cluding Novell and is de- 
signed to take advantage of 
the expanding computing 
power of various micro- 
computing systems. The 
software can be used with 
Unix Version V on Sperry 
5000, AT&T 3B Series, and 
NCR Tower Installations. 

ZLKO from Elliam Asso- 
ciates is used to link relo- 
catable object files created 
by ZMAC or other assem- 
blers that use the Microsoft 
REL format. ZLKO can be 
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used with compilers for 
FORTRAN, BASIC, COBOL, or 
C. ZLKO links the program 
on disk rather than in 
memory and thus links a 
program that will fill the 
entire available memory 
space. It produces a sym- 
bol table for debugging 
and can be used to segment 
a program that will not fit 
into memory into a tree 
structure of overlays. The 
price for the disk and in- 
struction manual is $49.95. 

CompuMagic has re- 
leased a package of 20 su- 
perutility programs for 
anyone using CP/M 2.2. 
There are three sets of pro- 
grams. The File Manage- 
ment programs CMCopy, 
Erase, Rename, Compare, 
Sort, DoubleSpace, and 
WordCount allow wild- 
cards, multiple commands 
on a line, and ask-me and 
test options, in addition to 
user-area switching. The 
Director programs MDIR 
and MDIRS take multiple 
file specifications. DIRBAK 
provides a list of all backup 
files, and DIRSPACE reveals 
how many directory en- 
tries are left. UDIR lists all 
the files in user areas, and 
DiskDIF tells what files are 
on one disk but not 
another. 

In the Special Utilites 
programs, CMAuto allows 
the creation of programs to 
run other programs; TYPIT 
turns a computer into an 
electronic typewriter; and 
A.COM corrects the com- 
mon A;program typo and 
turns it into A:program. 
Screen puts everything on 
the screen into a file, and 
R/O and R/W are replace- 
ments for STAT’s command 
to convert files to read/ 
only or read/write. Min- 
iera is a 1K program that 
allows erasing. The com- 
plete package is $45. 

Computer-Guru has in- 
troduced Salt & Pepper, a 
software program that con- 
tains 29 subroutine mod- 


ules in MS DOS-compatible 
BASIC. The modules are 
saved in ASCII format and 
can be lifted from disk and 
merged into a user’s pro- 
gram. The programmer 
can then use single-line 
commands to accomplish 
tasks such as creating pro- 
fessional menus and input 
screens, processing dates, 
changing strings to upper- 
case or lowercase, creating 
“walking” strings, trapping 
errors, and issuing Caps- 
Lock on/off. The package is 
available for $59.95. 

UX Software has an- 
nounced the UX-BASIC Na- 
tive Code Compiler to com- 
plement the UX-BASIC 
Interpreter (Version 2.1). 
UX-BASIC features struc- 
tured code; modular pro- 
gramming; sequential, di- 
rect, and ISAM files; and 
editing and debugging 
tools. It is functionally com- 
patible with IBM’s IX BASIC. 
Prices vary according to the 
class of target computer. 

Software Products & 
Services (SPS) has expand- 
ed its EPOS engineering and 
software development en- 
vironment to include tools 
for the automatic genera- 
tion of Pascal code. The 
EPOS software system sup- 
ports project design and 
development from the for- 


mulation of requirements 


to a complete design and 
system maintenance 
throughout the entire life 
cycle of a project. It also 
contains integrated man- 
agement tools for project 
control. The system is lan- 
guage-independent and 
supports seven design 
methodologies. 


For Apple 

SuperMac Technology 
has introduced three Mac- 
intosh add-on boards. En- 
hancements include Meg, 
a 1-megabyte memory ex- 
pansion board designed to 
coexist with internal hard 
disks; SuperDrive 20, a 


high-performance, 20-me- 
gabyte, 31-inch internal 
hard disk designed to im- 
prove the Macintosh’s file 
access speed up to ten 
times; and Enhance, a clip- 
on board that gives the 
original Macintosh 2 mega- 
bytes of contiguous RAM 
and a Macintosh Plus-com- 
patible Small Computer 
System Interface (SCSI) 
port. Meg is available for 
$849 for upgrading from 
128K and for $699 for up- 
grading from a 512K Mac- 
intosh. SuperDrive costs 
$1,299. Enhance can be ex- 
panded to 4 megabytes or 
more; its price has not yet 
been announced. 

ProFiler 2.1, a data man- 
ager/report generator for 
Apple II series computers, 
now has its utility program 
integrated into the overall 
program. The utility fea- 
ture allows transfer of data 
between ProFiler and 
AppleWorks. ProFiler 2.1 
can design, organize, file, 
search, sort, merge, calcu- 
late, and print reports and 
run on either floppy or 
hard disks. The menu-driv- 
en program can store up to 
1,500 records on a floppy 
disk or up to 65,000 records 
on a hard disk. No addition- 
al data entry is required to 
transfer data from one me- 
dium to another. The en- 
tire program, including 
the utility program, sells 
for $99.95 and is available 
from PM Software. 

Transwarp, an accelera- 
tor card that speeds up 
both the main and auxilia- 
ry memory of an Apple Ie 
computer, is available from 
Applied Engineering. The 
accelerator works with all 
Apple II+ and Ile software, 
including AppleWorks, Su- 
perCalc 3a, and VisiCalc, 
and is compatible with all 
standard peripheral cards. 
The $279 board plugs into 
any available slot in Apple 
II, i+, and Ile computers. 

Odesta has unveiled 
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four Helix products for the 
Macintosh Plus. Helix is a 
database  information- 
management and decision- 
support system that allows 
individuals to build appli- 
cations tailored to their 
specific needs. Double He- 
lix allows users to create 
custom menus and install 
security to protect the 
structure of their applica- 
tions. Value-added resel- 
lers and application pub- 
lishers can build 
stand-alone vertical pack- 
ages with Run-Time Helix. 
MultiUser Helix allows 
networked users to work 
simultaneously with a cus- 
tomized Helix application. 
Helix and Double Helix for 
the Macintosh Plus and 
512K Macintosh are avail- 
able for $395 and $495, re- 
spectively. Run-Time Helix 
for both Macintosh prod- 
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ucts can be licensed for a 
fee of $500 for ten applica- 
tions. The price has not yet 
been determined for Mul- 
tiUser Helix. 


Communications 

Practical Peripherals’ 
Modem 1200 is Hayes-com- 
patible and supports pulse 
or touch-tone dialing in 
full- or half-duplex opera- 
tion. It self-adjusts to vary- 


ing transmission speeds 
from 300 to 1,200 bits per 
second. The product con- 
forms to all Bell 212A and 
103 standards and com- 
plies with the require- 
ments of FCC Part 68 for di- 
rect connection to public 
phone lines. The 4 X 5- 
inch card is installed in ei- 
ther a short or long slot 
within IBM PC/XT/AT or 
compatible computers. 
The Dual Serial Port 
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FOR FREE! 


At Xanthus, we are documentation experts. From initial writing through final printing, 
we can quickly and economically improve your current documentation—and the image it projects for your 
product and your company. For more information about our exclusive Documentation Upgrade 
and our free demonstration offer, call Xanthus at 1-800-231-5994 (outside of Texas) or 512-450-0044. 


See us at Spring COMDEX booth #3553 
5926 Balcones Drive « Suite 210 « Austin, TX 78731 


Manager (DSPM) is a hard- 
ware/software interface 
program. Available from 
Akron Software, DSPM has 
a full-interrupt drive, auto- 
matically buffers all re- 
ceived and transmitted 
data, and allows users to 
specify the size of each 
buffer independently. It 
also allows an application 
program to use both COM1 
and COM2 simultaneously 
and supports three data- 
transfer protocols. The 
DSPM package provides in- 
terfaces to programs writ- 
ten in Pascal, C, compiled 
or interpreted BASIC, FOR- 
TRAN, and assembly lan- 
guage. It costs $99. 
Quasitronics has an- 
nounced the Pipe Six, an 
intelligent data switch that 
has six RS-232 I/O ports 
that provide communica- 
tions between dissimilar 


SEE HOW YOUR DOCUMENTATION CAN GO 
FROM THIS 


GETTING STARTED 
Using the 


TO THIS 


MENUS AND SCREEN PROMPTS 


Prompts When i needs information from you 


If you do not wish to choose any of th: 
re 


MENU 1 
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In thus type of menu. RPC presenu a list of 
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CHAPTER ONE 
GETTING STARTED 


micates with you through its menus and screen 
wt Raghlights 
the available choices on a line near the bottom of the screen 
@ Opuons. you can 
the premous screen by pressing the <ESC> key 


The foliowing section describes the various types of menus 
screen prompts that you will see as you work with RPC 


orces wih the 


ch 
current selection Mighhghted This highhghted area 1s called 


systems and/or peripher- 
als operating with differ- 
ent baud rates, word struc- 
tures, and flow control 
techniques. The system 
features 54K of allocated 
memory for speed conver- 
sion, printer buffering, 
message storage, and pri- 
vate mail. It can handle 
concurrent communcia- 
tions between all of its 
fully interactive ports. 
Unlimited Processing 
has announced Team-Up, a 
Total Environment for Ap- 
plication Management. 
Team-Up adds application 
management to data man- 
agement functions by 
managing up to 32,000 ap- 
plications containing up to 
700,000 files. It tracks file 
existence, file names, serv- 
er/directory file locations, 
and user-access authoriza- 
tions. Prices range from 
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OF INTEREST 
(continued from page 125) 


$795 to $4,495, depending 
on configuration. 


Miscellaneous 
USecure, a system security 
and administration prod- 
uct for Unix-based comput- 
ers, is available from Uni- 
tech Software. USecure is 
menu-driven and provides 
automated system access 
control and audit trails of 
system changes, file modi- 
fications, access permis- 
sions, deleted files, and 
start-up and shutdown ac- 
tivity. Pricing varies from 
$300 on a PC to $2,500 on a 
mainframe. 

Logicraft’s GraVAX 
brings high-scale resolution 


graphics and PC compati- 


bility to the VAX environ- 
ment while maintaining 
the VT-100 DEC terminal ca- 
pabilities. GrafVAX is a bus 
extension of the company’s 
Cardware product line and 
consists of two compo- 
nents. The QO-bus version, 
which plugs directly in the 
DEC Q-bus, is priced at 
$2,990 per user, and the Un- 
ibus version, which can be 
located up to 4,000 feet 
from the CPU, is priced at 
$5,980 per unit. 

The MII-1 Bubbl-Board, a 
bubble-memory system 
from Bubbl-tec allows 
Multibus II machines to 
make use of solid-state 
mass storage in applica- 
tions for which electrome- 
chanical media such as 
disk and tape are unsuit- 
able. The MII-1 system pro- 
vides 512K of nonvolatile 
mass’ storage on a 
singlewide Multibus II 
module and incorporates 
an intelligent controller 
that handles device for- 
matting and control, inter- 
faces the bubble-memory 
system to the Multibus II 
bus structure, and pro- 
vides for both soft- and 
hard-error detection and 
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correction. The system is 
also expandable to 32 me- 
gabytes. The 512K version 
is priced at $2,899 in quan- 
tities of ten. Versions with 
smaller amounts of on- 
board storage capacity are 
also available. 
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UNIX-like Utilities for 
Managing C Source Code 


No C Programmer should be 
without their assistant - C ToolSet 
from Solution Systems. The package 
consists of several utilities designed 
to help make C programming tasks 
easier. 

C ToolSet (formerly C Helper) 
includes: 

DIFF - Compares text files on a 
line-by-line basis or use CMP for 
byte-by-byte — indispensable for 
showing changes among versions 
of a program under development. 
So “intelligent’’ it stays in synch 
even when you add 100 lines. 


TM OM COC RSE ELIT 


C TOOLSET 


GREP - Regular expression searches 
- Ideal for finding a procedural call 
or a variable definition amid a large 
number of header and source files. 
FCHART - Traces the flow of 
control between the large modules 
of a program. 

PP (C Beautifier) - Formats C program 
files so they are easier to read. 
XREF (CCREF) - Cross references 
variables from a program. 


Available For MS-DOS, 
CP/M 86, CP/M 80 - $95 













ONLY 
335 Washington St. 


ip 6 
$95 Solution N Il MA 02062 
, Source Code Included S ystems ™ ein eas 57] 
800-821-2492 


Circle no. 152 on reader service card. 


Make your PC or AT intoa 


COMMUNICATING WORKSTATION 


for only $85 


Use ZAP, the Communications System for Technical Users 


COMPLETE Communications for PROGRAMMING and ENGINEERING 


EMULATION of graphics and smart terminals is combined with the ability to TRANS- 
FER files reliably, CAPTURE interactive sessions, and transmit MESSAGES while 
also being able to swap between your mini or mainframe session and your PC application. 
SUSPEND aline to run a PC application. Reconfigure features to fit the communications 
parameters and keyboard requirements of the host computer software. Complete technical 
documentation helps you understand and fit ZAP to your style. 


HIGHLIGHTS OF ZAP: 


Emulate TEKtronix 4010/14 and DEC VT 100, 102, 52 including 

variable rows and columns, windows, full graphics, even half tones. 

Reliable file transfer to/from any mainframes and PCs including KERMIT and 

XMODEM protocols plus you get a full copy of KERMIT. Transfer speeds ranging 

on 50 to 38,400 BAUD. Session control include printer dumps and save to 
isk. 

MACRO and Installation files (“‘scripts”) controllable by you. 

EMACS, EDT and VI “Script” files are included. ZAP is also used with other popu- 

lar software including graphics products like DISSPLA and SAS/GRAPH. 

CONFIGURABLE to communications, terminal features on the “other end”; 1,2 

stop bits; 5, 6, 7 or 8 data bits; parity of odd, even, none, mark and space; remap all keys 

including the numeric pad and standard keyboard, set any ‘“‘virtual” screen size. 

Full PC/MSDOS access to run any command or program that will fit in your systems 

memory. ZAP takes less than 64K. 

9 Comm ports are supported by ZAP. Plus full color in text and graphics make use of 

the IBM color, EGA cards, or Hercules Monochrome. 


ONLY . 
Sirens 


335-D Washington St. 
Norwell, Mass. 02061 
617-659-1571 
800-821-2492 
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Coprocessor. Running at 
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PC, XT, AT™, or com 
system. - 


The TURBOSLA 


TurboDOS™ multi 


VE-PC ‘s 


‘It is the only IBM-P 
MP/M™ compatible 
multi-user, multi-p Ss 
cluding full record lockin: 


Discover a whole new worl 
(8MHz) single and multi-us 
for your personal compute 
TURBOSLAVE-PC.. . the wo 
Z-80 Coprocessor, with su 
features as: - 

¢ 128K RAM with parity | 

e 2 Serial ports _ 

¢ On-board Counter Timer — 

¢ S.L.R. Z-80 assembler incl 


To order your TURBOSLAVE-PC 
write to: 2 |. 


pp 


P.O. Box 8067, Fountain 
TELEX: 910 997 61 


Ask about EARTH COMPUTERS’ othe 
_ fine PC and S-100 compatible pro 


IBM-PC, XT, AT are trademarks of Inte 


Business Machines,|Inc.; 
trademarks of Digital Res 
trademark of Software 2000; TU 
trademark of Earth Comput 
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Products With 
Expandability 








A two user Slave card naaea on 
Hitachi’s Z80 compatible high speed, 
10MHz super microprocessor. 


~ $495" 


Features Include... 


4-10 MHz Z80 Compatible HD64180 
1/2 Megabyte Nonbanked Memory 
2 Asynchronous Serial Ports To 38.4 
1 High Speed Synchronous Port 
All Transfers Via 1.6 MHz DMA!!! 
Unique Expansion Port Offers; 

2 Additional Serial Ports or... 

2 Parallel Ports or... 

Real Time Clock With Battery Backup 





The industry’s fastest 8-bit Master CPU 
card with features superior to most 
16-bit cards. 


< $495° 


Each Master Features... 


4-10 MHz Z80 Compatible HD64180 
1/2 Megabyte Nonbanked Memory 
2 Asynchronous Serial Ports To 38.4 
1 High Speed Synchronous Serial Port 
4 Bi-directional Parallel Ports 
TurboDOS**, ZSYSTEMS**, CP/M**, 
& OASIS** Operating Systems 
FDC Simultaneously Controls 
8”, 5%”, & 3%” Drives 
SASI/SCSI Interface 
Optional High Speed Hard Disk/File 
Access Tape Backup and True 
ETHERNET Controller 


*Prices apply to 6 MHz, 64KB versions and 
are good for a limited time only on 
purchases of ten or more. For less than 
ten, please call. 


**Trademarks: TurboDOS - Software 2000; ZSYSTEMS - 
Echelon; CP/M - Digital Research; OASIS - THEOS Software 


/ INTELLIGENT COMPUTER 
I DESIGNS CORP. 
23151 Verdugo Drive, Suite 113 
Laguna Hills, CA 92653 
(714) 581-7500 
Circle no. 278 on reader service card. 
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ent that 


odula-2 at its absolute best. It’s a fully integrated development 
takes into account what you need as a programmer. Without leaving 
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> Editor, you can call the compiler, linker and utilities. 


With Logitech’s Modula-2, you'll have the ability to edit several files at once, 
comparing, window to window, various code modules. You can even move from 
dow to window compiling, linking, debugging and running. 

The compiler has the kind of power and room to breathe that you really need in 
today’s complex applications. It is as easy to use as Turbo Pascal, without your 
programs being limited to 64K of code. 


At your command will be the libraries of modules that make Modula-2 a 
programmer’s dream. It has essentially the same structure as Pascal with the major 
addition of a library organization of code modules that allow you to put together 
programs on a solid, block-by-block, foundation of proven code. 

Whether you’re working with a module of your own making, or one of the many in 
our library, you'll find the system by which each module is identified, described and 
stored an organizational masterpiece. And that’s at the heart of Modula-2. 


Underneath the sophisticated system is a Modula-2 compiler that is the result of 
years of development and proven use in industry. We run on the Vax’, and we run on 
the IBM PC. And the code is portable-from one to the other. 


Best of all... you can have it right now! 


Complete with Editor, 
Run Time System, Linker, Cursor-posi- 
tioning debugger, 8087 Software Emula- 
tion, BCD module, Logitech’s extended 
library, Utility to generate standard .EXE 
files, Turbo Pascal (and standard Pascal, 
too) to Modula-2 translator (included 
without charge until 8/1/86), and much, 
much more! 


Evenif 
you haven’t yet gotten an 8087 co-pro- 
cessor, you can still use this version. 


For machines with 


512K or more. Takes advantage of the 
larger memory to increase compilation 


speed by 50%! Supports 80186 and 80286 
as well as 8086 and 8088. Includes 8087 
and 80287 support, too. 


Now you can build true win- 
dowing into your Modula-2/86 code with 
ease, too. Very powerful and very full, yet 
only ISK in size. Features virtual screens, 
color support, overlapping windows and a 
variety of borders. 
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(source level) Much more 
powerful than just a symbolic RTD. 
Display source code, data, procedure call 
chain and raw memory. Set break points, 
assign values to variables, pinpoint and 
identify bugs in your source. The ultimate 
professional’s too!! 


Features a post-mortem de- 
bugger for static debugging. If a program 
you've written crashes at run time, the 
Situation is frozen, and you can pinpoint, 
in source, the cause of the error and the 
data at that moment. Also includes a 
disassembler, a cross reference utility and 
a “version” utility that allows conditional 
compilation. 


Automatically selects modules af- 
fected by code changes for quick and 
minimal re-compilation and relinking. 
Even figures out dependencies for you. 


Source code for our major library 
modules is now available-for customiza- 
tion or exemplification. 

If you need to produce rommable 


code, call our 800 number for further 
information on this package. 


dula2 








To place an order call our special toll free number 


800-231-7717 


in California 


800-552-8885 
Special offer until 8/1/86! $89 


includes 
Free! $49.95 value Turbo Pascal translator! 
Now, you can take your library with you! 


I'd like to take the next 
» logical step in programming. 
Please send my copy of Logitech Modula-2/86 
to the following address: 
OOVISA OMasterCard 0 Check Enclosed 


Card Number Expiration Date 


Signature 





Name 





Address 
City 








State 
Here’s the configuration I'd like: 
0 Logitech Modula-2/86 $89 


OD Logitech Modula-2/86 $129 O Run Time Debugger $69 
with 8087 support (source level) 


O Logitech Modula-2/86 Plus $189 CO Utilities Package $49 


Please add $6.50 for shipping CO Make Utility $29 
and handling. O Library Sources $99 


Total enclosed $ 


(California residents, please add applicable sales tax) 


LOGITECH 


LOGITECH, Inc. 

805 Veterans Boulevard 
Redwood City, California 94063 
Telephone (415) 365-9852 
For European pricing, please contact: 
LOGITECH SA 
Box 32, CH-1143 Apples, Switzerland 
Telephone 41 (21) 774545 


e@eeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeoeeeeeee 


i scammer TRIS ( | catetcindateemamei 
And include the indicated items: 
CO) Window Package $49 








Please call our 800 line for: 0 Information on our *VAX version 0 Site License and University Discounts 0 Dealer and Distributor information 


*Turbo Pascal is a registered trademark of Borland International 
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2 : ? enters ed including the Compaq Deskpro Wan Sperry a - 
2 hae and TI Business-Pro computers. 
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: Perel to steal the heart of programmers, the 87 Soft- 

ware Pak supports IBM’s BASIC Compiler 1.0 and 2.0, 

evated Microsoft’ s QuickBASIC; executing math-intensive 
_ programs up to 20 times faster! The 87 Software Pak also 
~ performs FFT’s and Matrix operations. For example, a 

PC (or PC/XT) with an 87 Chip and 87 Software Pak 
can perform a 512-point complex FFT in just 1.1 seconds. 
What’s more, a PC/AT with a FAST/8A inverts a 25 by 
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Is Getting A Fast Reputation. 


Available at your local computer dealer 


HAUPPAUGE Math Coprocessors 
sor for PC/AT and compatibles ....$379 


* 287 Chip PC/AT math uae 


87 Chip Math ee for sy 


NOM UOPGMcces ns ee 
87-2 Chip Math coprocessor Frais ae See Sat 2 


HAUPPAUGE Math Coprocessor Paks 


87 Math Pak V.6.0 87 chip and math eres ce 
support for IBM BASIC Compiler 1.0, 2.0 and Microsoft's 


QuickBASIC. Plus, Matrix and FFT support, one year of free : 
updates, eae elias oe are — Sie aes ce 


| Se Me er ee Zio 
87 Software Pak V.6. 0 Math coprocessor cee eae 


POMC OPM Cee elem ot ams entero nt) nena cepa tele 
With any Hauppauge math coprocessor .............-..-.--$150 

- Bere + Math coprocessor support for oes) io STay ape .$ 95 
BAG teeteroy melt eeriicon ire eee» eee) sneer cerns en eb 
HFT+ este Ce Hayes Fourier Transform Package. oe aeSrL 
reat Tah a welll arctica it-(e 2 Wee) 2) coe ©) ae: tb: 


The 287 FAST/8 Doubles Your PC/AT’s Nene Saar 
Help your PC/AT get a fast reputation with Hauppauge’ 5 
new 287 FAST/8A. Call today, or contact your local 


computer dealer to learn more about Hauppauge’s racy _ 


product line. And ask for “87 Q & A?’ our free booklet 


on math coprocessors. 


Hauppauge Computer Works, Inc. | 
358 Veterans Memorial Highway, Suite MSI, 


Commack, New York, USA 11725 ¢ 516-360-3827 





287 FAST/8A 8MHz math coproces- _ 


287 FAST/5 5MHz math coprocessor — 
mo PC/AT and compatibles...... ar YZ ed 


runs at 4MHz in Or igs oe. -$219 


